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The normal procedure tor a new 
Magazine is for the Editor to state 
the aims and objectives in the first 
editorial/ and I see no reason to 
deviate from that approach in this 
First Issue of. Color Micro Journal* 
First, though, I want to answer the 
question we have heard most since the 
initial announcement of the Color 
Micro Journal; 

Why another color Computer Mauaz.< 
As the saying goes, "that's a long 
story". 

■68 1 Micro Journal made it f s debut in 
1979 as a Magazine Cor the Users of 
the Motorola 6800 CPU Chip, and has 
gained a devoted following worldwide. 
Tt became the "sounding board" for 
those users, and has been the major 
factor in the development of a 
consistency within the SS-50 Bus and 
FLEX community that is the envy of the 
"other guys". The 6809 Micro 
Processor made it's appearance a 
little later, and eventually showed up 
in a little "game machine" from Radio 
Shack called the TRS-80C Color 
Computer. It was "a natural" for *68* 
Micro Journal to become the first 
magazine to provide coverage of the 
Color Computer, and it has continued 
to provide information Cor the 
advanced users of the Color Computer 
every since. The SS-50 Bus Users saw 
the Color Computer as a way of 
introducing "new blood" into that 
market, and many of the *68* Micro 
Journal advertisers began producing 
products for the computer. 

Continued on pag* 9 
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CHECKS /BAS 



requires 32K, Ext-BASIC 

CHECKS is an extremely "User Friendly" 
Color Computer Program that will 
eliminate the problems of making the 
Checkbook and Bank Statement agree. 
CHECKS is fully Menu Driven and is self 
explanatory; the Main Menu leads to a 
sub-Menu if required, and options are 
selected as required. A lot of error 
checkijig has been installed, and you 
.e aumetuub >ppoctunittes to go 
back to the Main Menu "cleanly" should 
you find that you are "not where you 
want to be". 

Basically, the Program operates just 
like you normally use your Checkbook 
and Bank Statement at the present 
time, and provides several "search* 
and "find" features that make it easy 
to separate out all of the Checks 
written tor "Food", "Household Items", 
etc. The "Accounts" provided include 
FOOD, AUTO, HOMEfIT) for household 
items, CLOTHES, HOME(EX) for home 
expenses, PET&ENT for Pet and 
Entertainment, MEDICAL, DEPOSIT, and a 
"YOU DEFINE" Account, A Data File is 
made up for the months Checks and 
Deposits and another one for the 
months Bank Statement when you enter 
the information from your Check Book 
or Bank Statement, The System 
"Closes" a file when ALL Checks are 
accounted for for each month from the 
Bank Statements (this does not mean 
that you do not have access to the 
information, just that all checks for 
that month have been cancelled). 
Cancelled Checks are marked with a "C" 
(i.e.. Check #387 has not been 
cancelled, while Check I389C has 
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been)* Since I normally write a lot of 
checks each month, I normally enter 
the Checks and Deposits weekly so I 
won't have a lot to do when the 
Statement shows up. When it arrives. 
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Guarantor: We will ship your order for items in this ad within 48 working hours or you get 20% OFF! 
(Books/non-rel eased items excluded. Gift certificate issued when shipped. Offer expires September 30,1983) 

MASTER CONTROL II 

from Soft Sector Mark»tif]o 

This is a BASIC language program designed to decrease 
typing time and error while providing direct centred ol 
motor, trace, audio and run, With Automata Line Number- 
ing and a custom key you can re-use or change at any 
time; plus 50 preprogrammed command keys. Can be 
used on a 32K system 

21340 16K/32KTape£34dW $21.21 
Now 15% off til Sept 30 

RAINBOW-WRITER 
SCREEN FORMATTER 

by Rainbow Connection Software 
The ultimate hi-res graphics text display. User deftnaftlt 
224 character set, 12 hzss In a multitude of colors with 
many screen features, including status/help screen. 
Wonts in all PMOOE5 — save characters, symbols, and 
animated figures to use in your own BASIC or ML pro- 
grams. Easily create dazzling display* — the possible 
uses are almost unbmrted! 

33455 16K Extended Basic Tape $29,95 
32757 Disk $32.95 

COLOR 
COMPUTERS NEWS 

1981 BACK ISSUES 

This is the complete collection! of articles appearing m the 
first 4 issues ol Color Computer News (May 10 December 
ol '61 > 1? different topics are covered pfcis continuing 
features like "ReMarks", Kids Page and New Products. 

43209 Softcover $9.95 

While they lest— quantities limited. 



PROTECTORS 

from Tom Mix Software 

You nave 4 Ships armed with laser cannon and smart 
bombs. They have waves ol enemy ftgtilers; their mother 
ships have laser and heal-seeking mines. Get a new ship 
for each 5,000 points you score. Exciting arcade action 
with hi-res 4-co*o* graphics 

41331 32KTapoJtf449 $21.21 

Now 15% off til Sept 30 




FLIGHT 



by Daw Hooper ar\o~ Mark Somes from Prickly Pear 
Fantastic graphics onenled Hi-Res ihgM simulator has 2 
speeds, 4 difficulty levels, views from top and side, in- 
strument panel and realistic joysiw* control Don't crash 
or have lo go around 1 '' Can you land on the runway lo 
hear the synthesized voice say "perfect landing"? 
33556 32K Extended Basic $19.95 



COLOR 
CATERPILLAR 

from Soft Sector Marketing 

This is the last-action arcade game you've been waiting 
lo play at home! Vbu must hit mushrooms and caterpillars 
— segment by segment — moths and tumble bugs. The 
challenges: they are all moving; when hit they split into 
additional segments or metamorphose into diflerent 
shapes; when yoo destroy a caterpillar, the new one that 
replaces it is a segment longer than the original 1 
36728 16K Tape $1MS $16.96 
Now 15% off til Sept 30 



MS 
GOBBLER 

from Specfro' AssoctohM 

Use your joystick to guide Ms Gobbler through 4 mazes 
on a black background with moving shapes to gobble 
Avod ghosts of different colors and personalities Zip 
through the teleportation spot and use inviso-maze 10 
make the walls disappear. 

32500 32 K Tape $21.95 




VIKING 





»om Prtckty r»«or 
Superb simulation game! Rise through the ranks of a 
Viking kingdom, increase your economic power and rank 
jrtil you win the game by becoming ruler of ■!. 1 to 4 
players can complete it in 2 to 4 hours. 

35109 16K 

Extended Tape $19.95 



FROGGER 




from CcvnSoft 

One ol the mosl popular arcade games ever now 
available Tor your Color Computer! Just as in the arcade 
game, you must dodge heavy traffic and jump the moving 
logs in the stream to get home Fantasise graphics. One 
or two players, use keyboard or joystick 

22947 16KTape $19.95 



WHIRLYBIRD 
RUN 

from Spocrro* Assocror** 

Pilot a chopper over varying terrain while destroying 
enemy bases with bombs and missiles. Destroy enemy 
hist depots and win their fuel Hi 'Res color graphics, 
machine language arcade game has three screens. He- 

quires joysticks. 

32511 16KTape $21.95 



DOLLARS 
AND SENSE 

from Specfror Asiociores 

Smarten up! What s mare important than learning about 
money'' This new educational game will teach your child 
about dollars and coins. Easily reinforces com recognition 
and value. Let trw kids count the change' 

27751 16K Extended Basic Tape $11.95 




New Store* How Open fit 

Rt.422 



Rt. 276 Pa Turnpike 

Plymouth Meeting Mall 
Plymouth Meeting, PA 



«.«• 



Cherry Hill Mall 
Cherry Hill, NJ 




Over 2500 Programs for TRS-80, ATARI 400/800, APPLE, IBM & VIC 20. 



Visit our other stores: 

829 Bethel fid., Columbus. Ohio 

Seven Corners Center, Falls Church. VA 

W. Belt Plaza. 6600 Security Blvd., Baltimore, MD 

White Flint Mall, flockville Pike. Rockville, MD 

Harvard Square. 13 Dunster Si., Cambridge, MA 



Opening Soon in Tulsa and Oklahoma City 

Westmoreland Mall, Rle 30 East, Greensburg, PA 

Plymouth Meeting Mall, 500 Germarrtown Pike, Plymouth Meeting, PA 

Cherry Hill Mall. Rle. 38 A Haddonheld Rd., Cherry Hill. NJ 

Nanuet Mall, Rle. 69 & Middletown Road, Manuel. MY 

Monmouth Mall. Rle. 35 & Wyckol. Road, Eatorriown, NJ 



FRANCHISE 

OPENINGS IN 

SELECTED CITIES 



1983 THE PROGRAM STORE 



To Order Call Toll Free 800-424-2738 
For Information Call (703) 556-9778 

Mtilordars: 

Send check or M O for total purchase plus $2 00 shipping and handling VA add A% sates tax 
Charge cards — include ail embossed information 
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!~THE PROGRAM STORE * Dept 09-09-3 • Box 9582 • 4200 Wisconsin Avenue, NW • Washington, D.C, 20016 



Hem # Title 



Tape.'OisKjRom/Book Price 



Postage $2 00 
Total 



Name_ 

Address 



□ CHECK D VISA City 

□ MASTERCARD Card # 

Computer to TRS-M Color Compolw 



Stale 



Zip 



Exp 



Color Micro Journal 



THE COMPLETE 6809 




Mow available 

from 




MICROWARG 

5835 Grand Avenue 
Des Moines, Iowa 50312 
515-279-8844 
Telex: 910-520-2535 



'UNIX is 3 trademark of Bell Laboratories QS-9 is a trademark of Mcroware and Motorola. Inc. 
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CHECKS /BAS 

Continued turn page 1 

the information is entered for it, and 
then the "B" option from Menu Item 6 
Is chosen to "Balance" the Checks and 
Statement, It is suggested that this 
be done with the Display first, and 
after any errors are corrected, you 
can then produce a Printer Output. 
The only "SPECIAL" item to be aware of 
is that BOTH the Check and Statement 
Files MUST include a Deposit No. "D-T 
(normally the first Deposit); this is 
the Balance from Last Month, which is 
compared often in balancing the 
, checks and statements. Menu Item No. 
6 provides an overall Procedure for 
using the Program, and provides an 
easy way back to the Menu by selecting 
the "A" option, so all you have to do 
is "RUN" the Program, select #6 from 
the Main Menu to see what needs to be 
done first, and select "A" to get back 
to the Main Menu to accomplish that 
task. (Don't forget to Save any Data 
that you have entered - I normally 
name my Data Piles JAN-C-83 for 
January, 1983 Checks, FEB-C-83 for 
February Checks, JAN-S-83 for the 
January Statement, Feb-s-83 for the 
February Statement, etc.) Changes to 
any items are easy through Main Menu 
selection #2, "VIEW OR CHANGE DATA". 
All in all, you will find it hard to get 
into trouble with this program, so go 
ahead and USE IT. 

Rather than outline the procedure for 
using the Program, you can "read the 
listing" to get a feel for how It works 
by locating the Line Number to "GOTO" 
tor each Menu Selection. For example, 
the Main Menu is in lines 40-150; lines 
170 and 180 send you to the 
appropriate section of the program. 
If you select Item #6 from the Main 
Menu, the program goes to line number 
3110, where lines 3120 through 3150 
indicate that you would first input 
the Statement Data, then LAST MONTHS 
Check Data (which you would read in 
from a File) and "Balance" the 
Statement to cancel the checks from 
last month, then "output" THAT data to 
a File (if ALL checks have been 
cancelled, that file will be marked as 
"Closed" so you will know that ALL of 
the checks have been cancelled) ♦ You 
MAY need to go back two or three 
months if those Check Files have not 
been closed yet due to outstanding 
checks. Then you Input THIS MONTHS 
Checks and Deposits (either thru Main 
Menu fl or from a File, or both) and 
again "Balance" the Statement to 
cancel any checks in this months File 
that are in this Statement, and SAVE 
the new File for this month. What you 
are doing with the Computer is the 
same thing you would do by hand when 
you receive a Bank Statement; go back 
and mark all of the Checks that have 
come in so you can determine those 
still outstanding and "Balance your 
Check Book". The Statement 
Information input provides for both a 
fixed Bank Charge and a Percentage 
Charge; enter a amount if they do 
not apply to your situation. Also, you 
may need to "dream up" Statement 
Numbers if your Bank does not use 
them; some Check Deposit slips have a 
number that has been marked out that 
you can use, or you can use something 
like 6-1 for the first Deposit in June, 
6-2 for the next, etc. At any time 



yoir can select Item "A" to get back to 
the Main Menu. (NOTE: you need to 
have at least one check in the System 
to get the Item 6 Menu displayed - re 
Line Number 3110 — "N" must be 
greater than 0.) 

CHECKS has been developed over a 
period of time while working with my 
own Checking Account; adding this and 
deleting that, until it has become a 
very handy Program to have on the 
Computer. As with any Program, there 
is still this or that to try, but it is 
a fully functional program as it now 
stands. Since I have a 32K Color 
Computer, there has been no need to 
compress the program as of this time, 
so you will find the layout of the 
Program and the Code to be fairly 
modular and easy to follow. It would 
not be hard for a Programmer with a 
little experience with the Radio Shack 
BASIC to "slim" it down some (this 
would also be a good project for those 
learning BASIC to tackle - it is not 
complex, just long), or to change it 
to a Program which calls separate 
programs from the Menu to get the 
System running on a 16K Color 
Computer. I originally started with a 
Tape System, then went to the Disk 
System; BOTH Systems are supported by 
this one Program. 

CHECKS uses Pokes and Peeks in two 
locations in the Program; one at Line 
Numbers 4380 and 4730 which 
effectively clears all data out of the 
computer to leave as much memory as 
possible for the Search through all 
Files for a particular item (it is used 
when Menu Item 9 is used), and the 
other is a Machine Language Routine 
loaded by Lines 5340 thru 5410 and 
used in Lines 5480 thru 5500. This 
routine SLOWS the Display of the 
Directory so you can read It as it Is 
dispalyed (this routine was pulled 
from a Program in "The RADBOT)* The 
value "Poked" in Line 5480 determines 
how fast the display scrolls. The 
Pokes in Line 5380 set up the "hooks", 
while the Data Statements contain the 
Code. The Search is much slower 
without the Pokes to open the buffer, 
with many more Disk accesses, but the 
program will work without them, and it 
will also work without the "slow down* 
for the Directory Listing. 

Albert Yates 

5 GOTO5340 

10 GOTO20 

11 SAVE"CHECK";END 

20 CLEAR3500:DIMT$(100):DIMDS(10 

0):DIMP${100):DIMS$(100):DIMA(10 

0) :DIMF$ (100) :DIMU$(100) :DIMAM(1 

00);DIMAMS(100) 

30 AA=20000:O=1 

40 CLS: PRINTS 13, "MENU" 

50 PRINT; PRINT" 1> INPUT CHECK DE 

P.& STA.DATA 

60 PRINT"2> VIEW OR CHANGE DATA" 

70 PRINT* 3> OUTPUT DATA TO TAPE 

FILES 

80 PR INT" 4 > INPUT DATA FROM TAPE 

FILES 
90 PRINT* 5> PRINT DATA ON PAPER 
100 PRINT" 6> BALANCE CHECK BOOK 
110 PRINT" 7> OUTPUT DATA TO DISK 

FILES 
120 PRINT" 8> INPUT DATA FROM DIS 
K PILES 

130 PRINT" 9> SEARCH ALL FILES (J 
AN-DEC) 
140 PRINT"D> TO SEE DIRECTORY 



150 PRINT:PRlNT"SELECT>l-2-3~4-5 

-6-7-8-9-D 

160 CS=INKEYS 

170 IFCS="1"THENGOTO200ELSEIFC$= 

" 2" THENGOTO50 0E LSE I FCS- " 3"THENG0 

T06 4 0ELS EIFC$=" 4 "THENGOT09 50ELSE 

IFC$="5"THENGOTO1090ELSEIPC$="6" 

THENG0T031 10E LSE IFCS= " 9 "THEMGOTO 

4 360ELSE IFC$= "D"THENGOTO5350 

180 IFC$="7*THENGOTO2140ELSEIFCS 

="8"THENGOTO2460 

190 GOTO160 

200 CLS: PRINT: PRINT; PRINT" (l)INP 
UT CHECKS OR DEPOSITS": PRINT" (2) 
INPUT BANK STATEMENT": PRINT: PRIN 
T"(M)TO GO TO MENU": PRINT 

201 PRINT*DO not USE THE $ SIGN 
ON INPUT. ": PRINT: PR INT" PROGRAM W 
ILL NOT DISPLAY NUMBERS PROPERLY 
THAT ARE OVER $9999* 99": PRINT: PR 
INT; PRINT" SELECT— > 1-2-M" 
210 C$=INK£Y$ 

220 IFC$="1"THENGOTO240ELSEIFC$- 

*2"THENGOTO2670ELSEIFC$="M"THENG 

OTO40 

230 GOTO210 

240 IFJ=0THENCLS:PRINT§192,*ENTE 

ft BALANCE FROM PREVIOUS FILE AS 

ENTRY #D-1 A DEPOSIT".-FORX«1T025 

00:NEXTX 

250 IFN<1THEN N=l 

260 FORJ-N TO100 

270 CLS 

280 IF J=l THEN GOTO 300 

290 PRINT "LAST CHECK #="T$((J)- 

1) 

300 PRINT"ENTRY*"(J),:PRINT"MEM= 

";:PRINTMEM: PRINT 

320 IFC$="2*THENPRINT"TYPE <XX> 

WHEN FINISHED!" SPRINT" ENTER A <C 

> TO CHANGE TO CHECKS. ": PRINT: PR 

IMT*ENTER YOUR DEPOSIT INFQRMATI 

ON." 

330 IFCS="2"THENGOTO350 

340 PRINT" TYPE <XX> WHEN FINISHE 

D|": PRINT" ENTER A <D> TO CHANGE 

TO DEPOSIT": PRINT t PRINT" ENTER YO 

UR CHECK INFORMATION." 

350 INPUT"NUMBER";TS(J) 

360 IFT$(J)="XX"THEN N=J:GOTO40 

370 IFT$(J)="C"THEN C$=*1":N-J:G 

OTO 250 

380 IFT$(J)="D"THEN C$*"2":N^J:G 

OTO 250 

390 INPUT"DATE:":D$(J) 

400 INPUT" PAYABLE TO:";P$(J) 

410 IFC$=*2"THENPRI NT" PAYABLE FR 

OM" i INPUTFS (J) 

420 CLS:PRINT87,"*****ACCOUNT*** 

**": PRINT: PRINT" ( 1 ) AUTO" ,"( 5 ) F00 

D", "( 2} HOME ( IT) ",H6) CLOTHES", "( 

3)HCME(EX)","(7)PETSENT.","(4)ME 

DICAL*,"(8)DEPOSIT",,"(9)YOU DEF 

INE" : PRINT: PRINT"SELECT-1 -2-3-4- 

5-6-7-8-9 

430 CC$=INKEY$ 

440 IFCC$="l"THENS$(J)="AUTO":G0 

TO480ELSEIFCC$="2"THENS$ (J) ="HOM 

E(IT) ":GCTO480ELSEIFCCS="3"THENS 

$ (J) ="HOME (EX) " :GOTQ480ELSEIFCC$ 

="4"THENS$ (J) ="MEDICAL" :GOTO480E 

LSEIFCC$=" 5"THENS$ (J ) -"FOOD" : GOT 

O480ELSEIFCC$="6"THENS$ (J)="CLOT 

HES":GOTO480 

450 IFCC$»"7"THENS$(J)=*PET&ENT. 

* :GOTO480ELSEIFCC$="8"THENSS (J) = 

"DEPOSIT* : GOTO480ELSEIFCC$="9"TH 

ENGOTO470 

460 GOTO430 

470 INPUT"YOU DEFINE ";S$(J) 

475 G0TO485 

480 PRINT:PRINTS$(J) 

485 PRINT: INPUTCHECK OR DEP. AM 

OUNT:$";A(J) 

490 NEXTJ 

500 CLS 

510 PRINT: PRINT j PRINT" (1) VIEW DA 

TA AND MAKE CHANGES" : PRINT" (2) TO 
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VIEW SELECTED DATA* tPRINT"(3)T 
VlStf TOTALS AMD %":PRINT" (4)TO 

VIEW OR CHANGE STATEMENT" I PRINT 
•(M) TO GO TO MENU": PRINT: PRINT" I 
NPUT SELECTION— >l-2-3-4-M" 
520 C$-INKEY$ 

530 IPCS»"1*THENGOTO550ELSEIFC$= 
" 2 "THENGOTOl 270E LSEI PC$=" 3"THENG 
CTO1680ELSEI FC$=" 4"G OTO2860E LSE I 
FCS= "M"THENGOTO40 
540 GOTO520 
550 IFN=0THENGOTO2210 
560 PORJ-1T0N 
570 CLS 

580 PRINTS!, OX$" <CHECKS> FILE " 
FC$ 

590 PRINT@96, "ENTRY I •J:PRINT"T 
OTAL ENTRVS ARE"N:PRINT"NUWBER - 
"T$(J):PRINT ,, DATE ="D$ ( J) ; PRIN 
T*PAY TO ="P$(J):PRINT*ACC0UNT=" 
S$ (J): PRINT" AMOUNT ="; :PRINTUSIN 
G"$$##f#.ir;A(JJ 
600 PRINT: PRINT" PRESS<BAR>TO VIE 
W NEXT ENTRY": PRINT: PRINT" PRESS< 
OTO CHANGE ENTRY": PRINT" PRESS<M 
>TO GO TO MENU" 

610 C$»INKEY$:IFCS*""THEN610ELSE 
I PCS *"C"THENGOTO2010ELSEI FX^ ="M" 
THENGOTO40 
620 NEXTJ 

630 PRINT" LAST ENTRY" : FORX=1TO50 
0:NEXTX:GOTO40 

640 CLS :PRINT§8, "OUTPUT TO TAPE 
FILES" 

650 PRINT: PRINT"REWIND TAPE PRES 
S<PLAY>ONLY 

660 PRINT" ENTER<M>TO GO TO MENU 
670 PRINT: INPUT" INPUT FILE NUMBE 
R 1-12"; AGM$ 

680 IFAGMS="M"THENGOTO40 
690 A*VAL(AGM$) 
700 IFA<1ORA>12THENGOTO670 



710 
720 
730 



FA-1THENGOTO810 
PC$-"4"THEN AA-lQOflil 
MOTOR ON 



740 PRINT" POSITIONING TAPE TO FI 

LE#"A 

750 IFA=2THENGOTO770 

760 FORY-lTOA-1 

770 FOR X=»1TQAA:NEXTX 

780 IFA=2THENGOTO800 

790 NEXTY 

800 MOTOR OFF 

810 IFC$="4"THENGOTO970 

820 PRINT: PRINT" (l)OUTPUTING CHE 

CKS":PRINT*(2)OUTPUTING BANK STA 

TEMENT" : PRINT"TYPE<M>TO GOTO MEN 

U": PRINT: PRINT"AFTER PRESSING<PL 

AY&RECORD>" i PRINT" MAKE SESECTION 

~>l-2-M 

830 CC$=INKEYS 

840 IFXr$-"l"THENGOTO860ELSElFCC 

$ »"2"THENGOTO2970ELSE IFCC$="M"TH 

ENGOTO40 

850 GCTO830 

860 CLS: PRINTS 19 2, "DATA IS NOW B 

EING SAVED ON TAPE" 

870 OPEN"0" # #-l r "CHECKS" 

880 PRINT#-1,N 

890 FOR7=1TON 

900 PRINT#-1,T${J),D$(J),P$(J),S 

${J),A(J),F$(J) 

910 NEXTJ 

920 CLOSE#-l 

930 PRINT"DATA IS NOW SAVED ON T 

APE* : FORX=1T01 500 ; NEXTX 

940 GOTO40 

950 CLS: PRINT@8, "INPUT FROM TAPE 

FILES" 
960 GOTO650 

970 PRINT" (1) INPUTTING CHECKS" :P 
RINT" (2) INPUTTING BANK STATEMENT 
" : PRINT"TYPE<M>TO GOTO MENU":PRI 
NT: PRINT* AFTER PRESSING<PLAY>":P 
RINT"MAKE SEL£CTlQN—>l-2-M 
980 CC$=INKEY$ 

990 IFCCS="1"THENGOTO1010ELSEIFC 
C$-"2"THENGOTO3040ELSEirCC$- ,, M"T 

1000 GOTO980 



1010 PRINT* DATA IS NOW BEING LOA 

DED IN* 

1020 OPEN"I*,#-l f "CHECKS" 

1030 INPUT#-l r N 

1040 FORJ-ITON 

1050 INPUT#-l f T$(J),D$(J),P$'J), 

S$(J),A(J),F$(J) 

1060 NEXTJ 

1070 CLOSE* -1 

1080 PRINT" DATA IS NOW LOADED IN 

TO THE COMPUTER" :F0RX=1T01 50 

0:NEXTX:GOTO40 

1090 CLS: PRINT: PRINT: PRINT "(1)P 

RINT ALL CK.SDP, ON PAPER": PRINT 

"(2) PRINT SELECTED DATA ON PAPER 

"SPRINT* (3) PRINT STATEMENT ON PA 

PER" : PRINT" (M) TO GO TO MENU" : PRI 

NT:PRIWT INPUT SELECTION— > 1-2 -3 

-M 

1100 CPS-INKEY$:IPCP$»"1"THENG0T 

O1120ELSEIFCP^="2"THENGOTO1480EL 

SEIFCP$=" 3"THENPN=2 : GOTO2860ELSE 

I FCP$="M"THENGOTO40 

1110 GOTO1100 

1120 CLS:IFN=flTHENGOTO2210ELSEPR 

INT#224,OX$" CHECKS AND DEPOSITS 

": PRINT" ARE BEING SAVED ON PAPER 

1130 PRINT#-2," 

"OXS" *"* CHECKS AND DEPOSITS 
*** "OX$ 
1140 PRINT#-2 

1150 PRINT! -2, "NUMBER" , "DATE*, *T 
O" , "AMOUNT" , "FROM" 
1160 PRINT#-2:T=0:D=0 
1170 FORJ-ITON 
1180 IFS$(J)-"DEPOSIT"THEND-D+A{ 

J) 

1190 IFSS(J)<>"DEP0SIT*THENT-T+A 

(J) 

1200 PL$-LEFT$(P$(J),14) 

1210 PRINT#-2,T$(J),D$(J),PL$,:P 

RINT#-2,USING"$$##1#,#I";A(J),:P 

RINT#-2," "F$(J) 

1230 PRINTI-2 



CoCo POWER 

UNLEASH THE POWER IN YOUR CoCo 
WITH ONE (OR MORE) OF OUR BOARDS. 



WORD-PAK $13995 

The WORD- P AK is a video boar d designed 
lo plug Into the expansion port of the Color 
Computer The board produces an 80 col- 
umn video display that compares easily 
wllh the high priced terminals. Software, 
included with the board, provides such ter- 
minal functions as; erase to end ot line, 
erase to end of screen, home cursor, x-y 
cursor positioning, etc. and the ability to 
re-program the display lor different screen 
formats. This last feature is useful In that it 
allows software, written for other compu- 
ters (such as the Model I), to be run on the 
Color Computer. Additional software sup- 
port includes a Flex patch, which allows the 
user to run ALL standard Flex software, and 
an enhanced version of TEXPRO III (text 
odiior pfocessoti 



MEM-PAK $110.00 

16K RAM ROM expansion board. Expand 
RAM beyond 64K (using the C-C BUS) or 
put your programs. 1 utilit les in ROM tor in- 
stant loading. The board utilizes 24 pin, 
compatible memory devices. (Supplied 
with 16KRAM). 



P-C PAK $ 79.00 

Free up your aerial port lor communication 
by adding this fully buffered, Centronics 
compatible parallel printer port to your 
computer. The cartridge can be supplied 
with an optional real time clock for $ 1 22 .95, 



C-C BUS $149 95 

The C-C BUS is an expansion bus which 
connects to the expansion port of the Color 
Computer and provides the user with six, 
software selectable, expansion ports. The 
bus is completely compatible with any size 
system and automatically senses system 
size to prevent contention problems, A uni- 
que feature of the C-C BUS is the ability to 
expand system memory size beyond &4K 
by adding one (or more) MEM-PAKs to the 
bus- A typical system might contain a disk 
controller, a parallel pnnter cartridge, a 16K 
RAM board, and a WORD-PAK. all instal- 
led and available to the computer. 



PHOTO-CoCo $ 10.95 (3, $20) 

Butld your own expansion projects on this 
prototyping baord that will mount inside a 
disk controller case when you're finished. 
Included is a manual with several expan- 
sion ideas. 



BARE BOARDS 

Save money by building your own. We will 
supply complete documentation including 
schematics, layout and parts list 
WORD-PAK SB $17.95 

C-C BUS BB $22.95 

P-C PAK BB $17,95 

MEM -PAK BB SI 4. 95 



SPECIAL: 

To celebrate Color Micro Journal's premier 
issue, we are offering the C-C BUS and the 
WORK-PAK at special prices. 11 you order 
belore September 30, 1983 and you men- 
tion that you saw the add in Color Micro 
Journal, you can purchase the C-C BUS for 
only $129,95. Or you can purchase the 
WORK-PAK for only $99 95 if you order it 
with the C-C BUS at the regular price. 



MAIL ORDERS 

Send check, money order, MASTER- 
CARD VISA (include card number, inter- 
bank number, expiration date and signa- 
ture) lor total purchase price, plus $2.50 lor 
Shipping and handling (Canadian orders 
please add $5 00) New Jersey residents 
add applicable sales lax. 



V 



inc. 

PO BOX 813 

N. Bergen, NJ. 07047 

(201) 330-1 896 



■ 
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1240 PRINT#-2, "TOTAL CHECKS-", :P 

RINT#-2,USING"$$####*t#"jT 

1250 PRINT#-2, "TOTAL DEPOSITS=", 

: PRINT* -2 .USING" $$##*#. I#"?D 

1260 GOTO40 

1270 CLS:IFN==0THENGOTO2210ELSEPR 

INT07, "WHICH ACCOUNT? "i PRINT: PRI 

NT" (1) FOOD" ," (6) AUTO" ," (2) HOME (I 

T]","(7)CLQTHES","(3)HOME(EXr," 

(8)PETfi.ENT.","(4)MEDICAL","(9)DE 

POSIT" ," (5) CHECK I"," (A) CHECK MA 

ME*,," (B) YOU DEFINE" :PRI NT t PRINT 

*SELECT-1 -2-3-4-5-6-7-8-9 -A-B 

1280 C$=INKEY$ 

1290 IFC$="1"THENBS="FOOD":GOT01 

350ELSEIFC$»"2"THENB$="HOME(IT) " 

: GOTOl 350 ELSE IFCS=" 3 "THENB$="HOM 

E (EX) " :GOT0135eELSEIFC$="4"THEWB 

$ ="MEDICAL" :GOTOl 350ELSE IFC$=" 5 " 

THENGOTO1320ELSEIFC$="7"THENB$=" 

CLOTHES" :GOT01 350 

1300 IFC$=*8"THENB$="PET&£NT.":G 

OTO1350ELSEIFC$="9"THENB$="DEPOS 

IT :GOTO1350ELSEIFC$="6"THENB$=" 

AUTO"jGOTO1350ELSEIFC$-"A"THENGO 

TO1340ELSEIFC$="B"THENGOTO1330 

1310 GOTO1280 

1320 INPUT" ENTER CHECK I ";B$:GO, 

TQ1350 

1330 INPUT* ENTER YOUR ACCOUNT "f 

B$:GOTO1350 

1340 INPUT"ENTER CHECK NAME ";B$ 

1350 CLS:T*0:P*0 

1360 PRINTS, 1, *** ,, B$"***" 

1370 FORJ=lTON 

1 380 IFBS-SS (J)THENT=T+A ( J) : P=P+ 

1 

1385 IFB$=T$ (J)ORB$=LEFT$(T$ (J) , 

LEN (T$ ( J ) ) -1 ) THENT=T+A ( J ) 

1390 IFB$=PS(J)TKENT=T+A(J) 

1 395 IFB$=T$ (J) ORB$=LEFT$ (T$ (J) , 

LEN(T$ (J) ) -1)THENPRINTTS (J) "**"D 

$ (J} ■*+"P$(J) "**"S${J) iPRINTUSIN 

G"$$#it#.i#";A(j) 

1400 IFB$=SS(J)THENPRINTT$(J)"** 
*D$(J) "**"PS (J) "**"? rPRINTUSING" 
$$#»». #I"?A£J) 

1410 IFB$=P${J)THENPRINTT$(J)"** 
"D$(J) "**"S$(J) "**",♦ JPRINTUSING" 

$$i»ll*#r;A(J) 

1420 IF P=10THEN PRINT" <MORE> PRE 

SS<ENTER>"; : INPUT P 

1430 NEXTJ 

1440 PRINTTOTAL OF-"B$"-IS "?:P 

RINTUSING"$Stt#l.##"fT 

1450 PRINT" TO CONTINUE PRESS<SPA 

CE BAR>" 

1460 CS»INKEYS:IFC$=* ,, THEN1460 

1470 GOTO40 

1480 CLS:IFN=0THENGOTO2210ELSEPR 

INT07, "WHICH ACCOUNT?"; PRINT :PRI 

NT* { 1 ) FOOD" , " (6) AUTO" , " (2) HOME (I 

T)* r "(7)CLOTHES" # "{3)HOME(EXp," 

(8) PET&ENT. " , * (4>MEDICAL" , " (9) DE 

POSIT" , "( 5) YOU DEFINE": PRINT: PRI 

NT" S ELECT-1 -2- 3-4-5-6-7-8-9 

1490 C$=INKEYS 

1500 IFC$»"l"THENB$-"FOOD":GGTOl 

540ELSEIFC$="2"THENBS»"HOME(IT) " 

:GOTO1540ELSEIFC$="3"THENB$="HOM 

E(EX) " :GOTO1S40ELSEIFC$="4"THENB 

$-"MEDICAL" :GOTO1540ELSEIFC$= 1, 5" 

THENGOTOl 5 30ELSE IFC3= "6 "THENB$=" 

AUTO" :GOTOl 540 

1510 IFCS="7"THENBS="CLOTHES ,, :GO 

TO1540ELSEIFC$»"8"THENB$="PET&EN 

T . " : GOTOl 54 0E LSE IFC$= "9 "THENBS' " 

DEPOSIT" :GOTOl 540 

1520 GOTO1490 

1530 PRINT: INPUT YOU DEFINE ";B$ 

1540 CLS:T=0 

1550 PRINT@224,"SLECTED DATA IS 

NOW BEING PRINTED ON PAPER 

■ 

1560 PRINT#-2,, "********** "B$" 

IN "OX$" *********** 

1570 PRINT#-2 

1580 PRINT#-2, "NUMBER" , "DATE" f "T 



O" , "AMOUNT" , "FROM" 
1590 PRINTI-2 
1600 F0RJ=1T0N 

1610 IFB$=S$(J)THENT=T+A(J) 
1620 IFB$=S$(J)THENPL$»LEFT$(P$( 

J), 14) 

1630 lFB$=S$(J)THENPRINT#-2 f T$(J 
) , D$ (J) , PL$ , % PRINT#-2 , USING" $$«# 
||,|l"jA(J) f :PRINT#-2," "F$< 

J) 

1640 NEXTJ 

1650 PRINTt-2 

1660 PRINT#-2, "TOTAL OF",* **** 

* "B$" ***** IS*, :PRINT#-2, USING 

"$$###I.*#-;T 

1670 GOTO40 

1680 T=0:B=0:C=0:D«0:E*0:F=0:G=0 

:Q^0:S=0 

1690 FORJ=lTON 

1700 T=T+A(J> 

1710 IFS$(J)="AUTO"THENB=»B+A(J) 

1720 IFS$(J)="F0OD"THENC^:+A(J) 

1730 IFS$(J)="HOME(IT)"THEND=D+A 

(J) 

1740 IFS$(J}="H0ME(EX)"THENOj-O+A 

(J) 

1750 IFS$(J)«"CLOTHES"THENE»E+A( 

J) 

1760 IFS$(J)= - PET&ENT,"THENF=F+A 

(J) 

1 770 IFS$ ( J ) ="MEDICAL"THENG=<J+A ( 

J) 

1780 IPS$(J)="DEPQSITTHENS=S+A( 

J) 

1790 IFS$(J)»"DEPOSIT"THENT=T^U 

J) 

1800 NEXTJ 

1810 IFT=0THENPRINTNO DATA IN F 

ILE":GOTO 1450 

1820 H=*/T*I00:I=C/T*100sK=D/T*l 

00:L=E/T*100:M=F/T*100:Q=G/T*100 

;R-Q/T*100:U=S-T 

1830 CLS 

1840 PRINT"CHFX^CS-"INT(T» "BAL.-" 

INT(U) 

1850 PRINT" AUTO ="B,"OR"INT{H) 

I860 PRI NT" FOOD »"C, "OR" INT (I) 

■t" 

1870 PRINTHOME-I =»D,"OR"lNT(K) 

"ft" 

1880 PRINTHOME-E ="Q,"OR"INT(R) 

1890 PRINTCLOTHES="E,"OR"INT(L) 

"%" 

1900 PRINT" PETSENT="F, "OR" INT (M) 

Man 

1910 PRlNTMEDICAL="G,"OR"INT(0) 

"ft" 

1920 PRINT" AUTO" : PR INT" FOOD" : PRI 

NTHOME (IT) * : PRINT" HOME (EX) ■ : PRI 

NTCLOTHES" ; PRINT" PETS ENT. " : PRIN 

T"MEDICAL" 

1930 Y=264:F0RX«1T0H*.4:PRINT@Y+ 

X r CHR$ ( 143+32) ; iNEXTX: PRINT! NT (H 

)"*" 

1940 Y^296:PORX=1TOI*.4:PRINT§Y+ 

X,CHR$( 143+48) ; :NEXTX:PRINTINT(I 

}"%" 

1950 Y-328:F0RX=1T0K*.4:PRINT^Y+ 

X ,CHR$ ( 14 3+1 6 ) ; : NEXTX : PR INTINT ( K 

)"%" 

1960 Y=360:FORX=1TOR*.4:PRINT@Y+ 

X,CHR$ (143+96) ; :NEXTX: PRINTINT(R 

)"t" 

1970 Y»392:FORX=lTOL**4:PRINTeY+ 

X,CHR$( 143+64) ; :NEXTX: PRINT INT (L 

1980 Y=424;FORX=lTOM*.4:PRINTeY+ 
X ,CHR$ (128) ; :NEXTX: PRINTINT(M) "% 

■ 

1 990 Y-4 56 : FORX= 1TOO* , 4 : PR INT@Y+ 

X ,CHR$ ( 1 4 3+1 1 2) ; : NEXTX : PRINTINT ( 

0)»%" 

2000 GOTO 1460 

2010 CLS:PRINTei2,"ENTRYf="(J) 

2020 PRINT ( 1) NUMBER -"T$ (J) : PR 

INT(2)DATE ="D$(J):PRINT(3) 



PAY TO ="P$(J) : PRINT (5) ACCOUNT 
="S$ (J) j PRINT (6) AMOUNT =";:PR 
INTUSING"$$###§ . ## "; A( J) : PRINT"P 
RESS(7)TO CONTINUE": IFSS (J) »"DEP 
OSITTHENPRINT" (4) PAY FROM="FS (J 

> 

2030 PRINT: PRINTMAKE SELECTION- 

-1-2-3-4-5-6-7 

2040 C$-INKEY$ 

2050 IFC$="1"THENGOTO2070ELSEIPC 

$ =" 2"THENGOTO208 0E LSEI FC$ =" 3" THE 

NGOTO2090E LSEIFC$="4 ■ THENGOTO210 

ELSEI FC$=" 5"THENGOT02 1 10E LSEI FC 

$=" 6 "THENGOT02 1 30ELSEIFC$=" 7 "THE 

NGOTO600 

2060 GOTO2040 

2070 INPUT*TO CHANGE NUMBER TYPE 

NEW DATA ";T$(J):GOTO2010 
2080 INPUTTO CHANGE DATE TYPE N 
EW DATA "jDS(J) JGOTO2010 

2090 INPUTTO CHANGE PAY TO TYPE 

NEW DATA ";P$(J):GOTO2010 
2100 INPUTTO CHANGE PAY FROM TY 
PE NEW DATA";F$(J):GOTO2010 
2110 PRINTTO CHANGE ACCOUNT TYP 
E NEW DATA": PRINT" AUTO", "FOOD" , n 
HOME ( I T) ", "CLOTHES" ," HOME ( EX )", " 
PET&ENT. " , "MEDICAL" , "DEPOSIT" 
2120 INPUTS$(J):GOTO2010 
2130 INPUTTO CHANGE AMOUNT TYPE 

NEW DATA " ? A(J):GOTO2010 
2140 CLS: PRINTS 35, "OUTPUT DATA T 
DISK FILES" .-PRINT: PRINT" (l)OUT 
PUT C.fi D. TO DISK": PRINT" (2) OUT 
PUR BK. STATEMENT TO DISK": PRINT 
"(3)0UTPIJT C.SD. W/BACKUP* : PRINT 
"(4) OUTPUT STATEMENT W/BACKUP":P 
RINTTYPE<M>T0 GO TO MENU": PRINT 
SPRINT INPUT SELECTION 1-2-3-4 
2150 PRINT: PRINTBACKUP REQUIRES 

DISK IN DRIVE 1 
2160 C$=INKEY$ 

2170 IFC$= , *1"THENGOTO2190ELSEIFC 
S =* ? "THRNGOTO? 1 1 0R f fl R IFC$ -"M "THE 
NGOTO40ELSE IFC$»" 3 "THENGOTO2190E 
LSE IFC$=" 4 ■THENGOT02 31 
2180 GOTO2160 
2190 IFFREE(0)<2THENGOTO5470ELSE 

PRINTS 262, "WHAT MONTH-YEAR? ': PRI 

NT C.& D. EXAMPLE" : PRINT 

" JAN-C-82 OR","JAN-C-83" r " F 

EB-C-8 2 OR" , "FEB-C-8 3 " 

2200 INPUTOXS 

2205 IFLEN(0XS)>8THENPRINTFILE 

NAME TOO LONG" :GOTO2200 

2210 IF N=0 THENCLS: PRINT§224," 

NO DATA IN COMPUTER" i FORX=1T01 50 

0:NEXTX:GOTO40 

2220 GOTO3900 

2230 OPEN"0",#l,OX$ 

2240 IFO>0THENFC$="OPEN" 

2250 PRINT#l,N r FCS 

2260 FORJKLTON 

2270 WRlTE#l,T$(J) f DS(J),P$(J),S 

$(J) f A(J),FS(J) 

2280 NEXTJ 

2290 IFC$="TTHENGOTO2400 

2300 IFC$="3"THENGOTO2400 

2310 1 FFREE ( ) <2THENGOTO5470ELSE 

PRINTS 262, "WHAT MONTH-YEAR?" : PRI 

NT§288 r " STATEMENT EXAMPLE" 

: PRINT" JAN-S-82 OR","JAN-S^83 

" , ■ FEB-S-8 2 0R" , ■ FEB-S-83* 

2320 1NPUT0M$ 

2325 IFLEN(OM$)>8THENPRINT"FILE 

NAME TOO LONG" :GOTO2320 

2330 IF NK=0TH£NCLS: PRINTS 224, "N 

DATA IN COMPUTER" :F0RX=*1T01 500 

:NEXTX:GOTO40 

2340 GOTO4130 

2350 OPEN"O",#l,0MS 

2360 WRITE#1,CN,DN,NK,SA,SN,SC,S 

T,SD 

2370 FORK-1TONK 

2380 WRITE#1,U$(K),AM$(K) 

2390 NEXTK 

2400 CLOSEfl 

2410 IFC$="2"THENDRIVE0:SK=0 
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2420 IFC$="1"THENDRIVE0:SK=0 

2430 IFC$="3"THENDRIVE1:SK=1:C$- 

"l":CLS:PRINT@8 f "BACKUP DRIVE 1" 

:GOTO3900 

2440 IFC$="4"THENDRIVE1:SK=1:C$= 

"2" :CLS:PRINT§8, "BACKUP DRIVE 1* 

:GOTO4130 

2450 GOTO40 

2460 CLS: PRINTS 35, "INPUT DATA PR 

OM DISK FILES": PRINT; PRINT" (1) IN 

PUT C.S D. FROM DISK": PRINT" (2)1 

NPUT BK. STATEMENT PRQK DISK": PR 

INT"TYPE<M>TO GO TO MENU": PRINT: 

PRINT" INPUT SELECTION — >l-2-M 

2470 C$=INKEY$ 

2480 IFC$-"1"THEN3OTO2500ELSEIPC 

$-"2"THENGOT02 580ELS E IFC$="M"THE 

NGOTO40 

2490 GOTO2470 

2500 PRIWre262 r "WHAT MONTH-YEAR? 

■: PRINTS 295, "C,& D, EXAMPLE" :PRI 

NT" , JAN-C-82 OR" , " JAN-C-8 3" , " 

FEB-C-8 2 OR" , " FEB-C-8 3" 
2510 INPUTOXS 
2520 OPEN"I",#1^0XS 
2530 INPUT* 1,N,FC$ 
2540 F0RJ=1T0N 

2550 INPUT#1,T$(J),D$(J),P$(J),S 
$<J),A(J),F$(J) 
2560 NEXTJ 

2570 IFC$-"1"THENSOTO2650 
2580 PRINTf262, ,, WHAT MONTH-VEAR? 
":PRINT@295 r "STATEMENT EXAMPLE": 
PRINT" JAN-S-82 QR","JAN-S-83" 
# ■ FEB-S-82 OR" , "FEB-S-8 3" 
2590 INPUTOMS 
2600 OPEN"I",#l,OM$ 
2610 INPUT! 1,CN, EN, NK r £A f SN,SC,S 
T,SD 

2620 F0RK=1TQNK 
2630 INPUT! 1,U$(K),AM$(K} 
2640 NEXTK 
2650 CLOSeil 
2660 GOTO40 
2670 CLS: INPUT" ENTER # OF CHECKS 

ON STATEMENT" ;CN 
2680 1NPUT*EMTER # OF DEPOSITS 
N STATEMENT" ;DN 

2690 INPUT" ENTER MONTH OF STATEM 
EWT";QM$ 

2700 I NPUT" ENTER BALANCE ON STAT 
EMENT'ySA 

2710 INPUT" ENTER INTREST ON STAT 
EMENT";SN 

2720 INPUT" ENTER SERVICE CHARGE 
IF ANY";SC 
2730 INPUT" ENTER TOTAL AMOUNT OF 

CHECKS"; ST 
2740 INPUT" ENTER TOTAL AMOUNT OF 

DEPOSITS" ;SD 
2750 NK=CN+DN+1 
2760 PRINT 
2770 PRINT" INPUT C&D NUMBERS AND 

AMOUNTS 
2780 PRINT"TYPE <XX> TO CHANGE L 
AST ENTRY 

2790 PRINT: PRINT"ENTER FIRST NUM 
BER AND AMOUNT AS D-l THEN THE A 
MOUNT: PRINT 
2800 FOR K=1T0NK 

2810 PRINr , #"K;:INPUT"CK OR DEPO 
SIT NUMBER" ;U$(K) 
2820 PRINT"|"K;:INPUT*'CK OR DEPO 
SIT AMOUNT" i AM$(K) 
2830 IF U$(K)~"XX"THEN K=K-l:GOT 
02810 
2840 NEXTK 
2850 GOTO 40 

2860 CLS:IFNK*0THENGGTO2330ELSEP 
RINT#-PN,"(S)TATMENT *0M$" BL."S 
A 

2870 PRINTt-PN, "(C) HECKS "CN,"(D 
JEPOSITS "DN 
2880 PRINT#-PN r " <NUMBER> 

<AMOUNT> 
2890 NK^N+DN+1 
2900 GOTO4750 
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2910 pRiNr#-PN, ***************** 
*******»****#**" 

2920 CLS:PRINT#-PN:FRINT#-PN:PRI 
NT#-PN, * (E)TOTAL CHECKS**="; iPRI 
NT#-PN,USING"$$####.##"? ST: PRINT 
f-PN," (F) TOTAL DEPOSITS-"; ; PRINT 
#-PN,USENG"$$#ifl.fl"?SD 
2930 PRINTf-PN, " (G) rNTREST****** 
*= "?jpRINTi-PN r USING"$$##.#i"; 
SN:PRINT#-PN, "(H) SERVICE CHARGE^ 
■;jPRINT#-PN,USING"$$#|.|#";SC 
2940 PRINT 

2950 IFCP$="3"THENPN=0 
2960 GOSUB4890:GOTO40 
2970 CXS: PRINTS 19 2, "DATA IS NOW 
BEING SAVED ON TAPE" 
2980 0PEN*0",#-1, "STATEMENT" 
2990 PRINT#-1,CN,DN,KN,SA,SN,SC, 
ST,SD 

3000 F0RK=1T0NK 
3010 PRINT#-l f US(K),AM$(K> 
3020 NEXTK 
3030 GOTO920 

3040 CLS: PRINTS 192, "DATA IS NOW 
BEING LOADED IN" 
3050 OPEN" I ",#-1," STATEMENT" 
3060 INPUT#-l f CN,E*J r KN,SA,SN,SC, 
ST r SD 

3070 F0RK-1T0NK 
3080 INPUT#-1,U$(K),AM${K) 
3090 NEXTK 
3100 GOTO1070 

3110 IFN-0THENGOTO2210ELSECLS:PR 
I NT" BALANCING CK BOOK WITH STATE 
KENT 

3120 PRINTS 38, "<LtST OF PRCCEDUR 
E>" 

3130 PRINT" (1) INPUT STATEMENT DA 
TA": PRINT" (2) INPUT LAST MONTHS C 
K DATA": PRINT" ( 3) ENTER<B>BALANCE 

STATEMENT" : PRINT" (4) OUTPUT LAST 

MONTHS CK DATA" 

3140 PRINT" (5) INPUT THIS MONTHS 
CK DATA" i PRINT" ( 6) ENTER<B>BALANC 
E STATEMENT": PRINT" (7) OUTPUT TH1 
S MONTHS CK DATA" 
3150 PRINT: PRINT" (A) TO INPUT OR 
OUTPUT DAT(MENU)": PRINT" (B) TO BA 
LANCE STATEMENT": PRINT" MAKE SELE 
CTION— >A-B 
3160 CC$=INKEY$ 

3170 IF CC$="A"THENGOTO40ELSEIFC 
CS="B"THENGOTO3190 
3180 GOTO3160 

3190 CLS : PRINTS 160, "(1) BALANCE W 
ITH PRINTER" SPRINT" (2) BALANCE WI 
THOUT PRINTER": PRINT: PRINT"MAKE 
SELECTION— 1-2 
3200 CC$=1NKEY$ 

3210 IF CC5="1"THENGOTO3230ELSEI 
FCC$=" 2"THEN3OTO3230 
3220 GOTO3200 
3230 CLS: PRINTS 2 36, "WORKING" 
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An taco Software 
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Spectral Associates 
Ghost GoOWar 

•19.95 
Planet Invasion 
Space Rk« Dataaoft, Inc. 
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3240 IFCC$«"1"THEN3OTO3510 

3250 O=fl:TA=SA:T-0 

3260 FCRJ=1T0N 

3270 F0RK-1TONK 

3280 AM<K)-VAL(AM$(K}) 

3290 IFT$(J)=U$(K)AND A(J)OAM(K 

)THENGOTO3800 

3300 IFT$(J)*U$(K)THENT$(J)=TS(J 

)+"C"tGOTO3410 

3310 IFRIGWTS {T$ (J) , 1) ="C"THENGO 

TO34L0 

3320 NEXTK 

3330 IFT>0THENGOTO3360 

3340 IFO>0THENGOTO3360 

3350 CLS: PRINT" OUTSTANDING CHECK 

S AND DEPOSITS" 

3360 TA»TA-A(J):CM>*A(J) 

3370 IFS$(J)="DEPCGITTHENT=*T4A{ 

J) 

3380 1FS$(J)-"DEP0SIT"THENTA=TA+ 

(A{J)*2) 

3390 IFS$ (J)- "DEPOSIT" THENCNO-A( 

J) 

3400 PRINTT$(J)"*"D$(J)'*"P$(J), 

:PRINTUSING"S$####.ff";A(J) 

3410 NEXTJ 

3420 PRINT 

3430 CLS: PRINTS 128, "TOTAL OF OUT 

DEPOSITS-"; jPRINTAJSING "$$##§ t.t 
l";T 
3440 PRINT"TOTAL OF OUT CHECKS- 

"j jPRINTUSING"$$####.#i";0 
3450 IFO=0THENFC$="CLOSED" 
3460 IFO>0THENFC$="OPEN" 
3470 PRINT-CHECK BOOK SHOULD BE 

"} :PRINTUSlNG"$$|##|,ff";TA-SN+ 
SC 

3480 PRINT"SUBTRACT SERVICE CHAR 
GE ";:PRINTUSING"S$##.|#";SC:PRI 
NT" ADD INTREST IF ANY "j :FR 
INTUSING"S$#t*l#"jSN:PRINT"NEW C 
HECK BOOK BALANCE";: PR I NTUSING"S 
$##•#. #t",TA 
3490 PRINT 
3500 GOTO1450 
3510 O-0:T-0:TA»SA 
3520 F0RJ=1T0N 
3530 F0RK=1T0NK 

3540 IFT$(J)=U$(K)THENT$(J)«T${J 
)+"C":GOTO3700 

3550 IFRIGHT$ (TS (J) , 1) ="C"THENGO 
TO3700 
3560 NEXTK 

3570 IFO>0THENGOTO3630 
3580 IFT>0THENGOTO3630 
3590 PRINTf-2, **************** W 
ITH "0M$" BANK STATEMENT ******* 
******** 

3600 PRINT* -2 

3610 PRINT#-2," OUT 

STANDING CHECKS AND DEPOSITS 

3620 PRINT! -2 

3630 TA=TA-A(J):0=OtA{J) 



Buy 1 Program Gef 10% Off 
Buy 2 or mom Programs Gef f 5% Oft 

Except Prickly-Pear Software 

Adventure International Mark Data Products 

Sea Dragon (32K i Super Pro Keyboard 

434.95 rf 989.95 

J& Fir* Copter ^^ Glaxxorre, Bumpers. 

S34.9S El Bandito * Cosmic Clones 

Tom Mix Software 424.95 ea 

'Donkey King (32KI 

526.95 Compularwant 

Space Shuttle (3?K | Doodle Bog 

j\ 428.95 Shsrt Treasore 

^P Trap Fall, Frog 924.9S ea 

427.95 aa RaiHumer 

BUM 

'Also available on disk (32K.) al extra charge 

All programs 1 SK on cassette unless olfterwise staled. 

Sand lor frs* compiece calalog and dascnptKjns 1 

WE pay postaofl.vOO sava mon*y» fin in* U S and Canada* 

TN restdams add 6 25% sales lax C O D orders add 42 00 



{615) 175-9956 • P.O-Boi 15892 • Chattanooga, Tn 3-7415 



3640 lFS$(J)="DEPOSlT-THENTA-TA+ 

(A(J)*2) 

3650 lFS$(J)-"DEPOSIT"THENO-0-A( 

J) 

3660 IFS$(JH"DEPGSIT"THENT=T4A( 

J) 

3670 PL$=MID$(P$(J),1,15) 
3680 PRINT*-2 f TS(J),DS(J),PL$, 
3690 PRINT#-2,USIN3"$$#|§#.##-;A 

(J) 

3700 NEXTJ 

3710 PRINT! -2, •TOTAL OF OUTSTAND 
ING DEPOSITS=" f :PRINT#-2 f lJSING"$ 
$t##t.*f*;T 

3720 PRINT#-2 r "TOTAL OF OUTSTAND 
ING CHECKS-", J PRINTf-2, USING" $$f 
#H.H";0 

3730 IFO>0THENFC$=*OPEN" 
3740 IFO=0THENFC$="CLOSED" 
3750 PRINT#-2, "CHECK BOOK SHOULD 
BE",:PRINT#-2,USlNG"S$*|##.##"j 
TA-SN+SC 
3760 PRlNT#-2, "SUBTRACT SERVICE 

CHARGE OF", :PRINT#-2, US ING "$$### 
l.ffSC 

3770 PRINT#-2,*ADD INTREST OF",, 

i PRINT#-2 ,USING"$$#### . ##" ;SN 

3780 PRINT* -2, "NEW CHECK BOOK BA 

LANCE IS % :PRINT#-2,USING"$$### 

f.*#"jTA 

3790 GOTO1450 

3800 CLS:PRINTei60,"CHECK#"TS(J) 

■ AMOUNT DOSEN'T": PRINT" AGREE WI 

TH STATEMENT AMOUNT" 

3810 FRINT:PRINT* CHECKBO 

OK 

3820 PRINT*#*T$(J)" "D$(J)" "P$( 

J)" "A(J) 

3830 PRINT" STATEMENT 

3840 PRINT"* "U$(K),AM$(K) 

3850 PRINT ; PRINT" (l)CHECKBOOK NU 

MBER": PRINT* (2)CHECKBOOK AMOUNT* 

i PRINT" (3) STATEMENT NUMBER" :PRIN 

T" ( 4 ) STATEMENT AMOUNT 

3860 PRINT: PRINT*WHICH ONE TO CH 

ANGE 1-2-3-4 

3870 WTC$=INKEY$ 

3880 IFWTC$=*2"THENGOTO5150ELSEI 

FV/IC$=" 1 "THENGOT054 30E LSEIFWTCS= 

" 4 "THENGOTO5170ELSE IFWTC$»"3 "THE 

NGOTO5450 

3890 GOTO3870 

3900 S-3 

3910 DSKI$SK,17,S,A$,B$ 

3920 G$=OXS 

3930 J$=MID$(A$,1,8) 

3940 IFGS=JSTHENGOTO4050 

3950 H$^ID$(A$,33,8) 

3960 IFG$*H$THENGOTO4050 

3970 E$=MID${A$,65,8) 

3980 IFGS=E$THEN3OTO4050 

3990 I$-MID$(A$,97,8) 

4000 IFGS=I$THENGOTO4050 

4010 IFFL=0THENA$=B$:FL=1:GOTO39 

30 

4020 S-S+l!FL*fl 

4030 IFLEFTS(A$,1)-CHR$ (255) THEN 

GOTO2230 

4040 GOTO3910 

4050 CLS:IFSK=0THENPRINT§12,"DRI 

VE 0" 

4060 IPSK=1THENPRINT§ 12, "DRIVE 1 

* 

4070 PRINT*THERE IS ALREADY A FI 

LE ON THIS DISK NAMED "OX$ 

4080 PRINT* DO YOU WANT TO WRITE 

OVER THE OLD FILE?" 

4090 PRINT:PRINT"(Y) YES* : PRINT" { 

N) NO": PRINT: PRINT" MAKE SESECTION 

— >Y-N 

4100 CC$-INKEY$ 

4110 IFCC$*"Y"THENGOTQ2230ELSEIF 

CC$-"N" THENGOTO40 

4120 GCTO4100 

4130 S=3 

4140 DSKI$SK,17,S,A$,B$ 

4150 G$=OM$ 

4160 J$^1ID$(A$,1,8) 



' 









4170 IFG$<T$THENGOTO4280 
4180 H$=*IDS(A$,33,8) 

4190 IFGS=H$THENGOTO4280 

4200 E$^UD$(A$,65,8) 

4210 IPG$=*E$THENGOTO4280 

4220 l£=MID${A$,97,8) 

4230 IFG$=I$THENGOTO4280 

4240 IFFL=0THENA$=B$tFL=l;GOTO41 

60 

4250 S-S+l:FL-0 

4260 IFLEFT$(A$,i)=CHR$( 255) THEN 

GOTO2350 

4270 GOTO4140 

4280 CLS:IFSK»0THENPRINTei2,"DRI 

VR 0" 

4290 IFSK=1THENPRINT§ 12, "DRIVE 1 

4300 PRINT*THERE IS ALREDY A FIL 
E ON THIS DISK NAMED "OM$ 
4310 PRINT :PRINT"DO YOU WANT TO 
WRITE OVER THE OLD FILE?" 
4320 PRINT" (Y) YES": PRINT" (N) NO": 

PRINT: PRINT"MAKE SELECTION— >Y-N 

■ 

4330 CCS=INKEY$ 

4340 IFCC$="Y"TH£NGOTQ2350ELSEIF 

CCS="N"THENGOTO40 

4350 GOTO4330 

4360 CLS: PRINT: PRINT* ALL FILES 

(JAN-DEC) SEARCH 

4370 PRINT :PRINT"ENTERCM>TO GO T 

MENU 

4380 PRINT: POKE 35, 127: POKE 36,2 

54 

4390 INPUT* ENTER NAME OF CHECK F 

OR SEARCH ":AA$ 

4395 IFAA$="M"THENGOTQ40 

4400 INPUT"WHAT YEAR 83,84, 85, EC 

T."?WY$ 

4410 IFWY$="M"THENGOTO40 

4420 TC=0 

4430 PRINT#-2," ******* 

*** SEARCH ALL FILES (JAN-DEC) * 
********** 

4440 PRINT* -2 

44SU RR$-«TAN-C-"+WY$iOOSIFR^Q0, 

GOSUB4620 

4460 BB$="FEB-C-*+WY$:GOSUB5l90 

GOSUB4620 

4470 8BS="MAR-C-"+WY$:GOSUB5190 

GOSUB4620 

4480 BB$="APR-C-"-lWYS:GOSUB5190 

GOSUB4620 

4490 BB$="MAY-C-"4WY$:GOSUB5190 

GOSUB4620 

4500 BB$="JUN-C-"4WY$:GOSUB5190 

GOSUB4620 

4510 BB$="JUL-C-"4WY$r GOSUB 5190 

GOSUB4620 

4520 BB$="AUG-C-"+WY$: GOSUB 5190: 

GOSUB4620 

4530 BB$-"SEP-C-"4WY$:GOSUB5190 

GOSUB4620 

4540 BB$-"OCT-<r-"+WY$: GOSUB 5190 

GOSUB4620 

4550 BB$»"NOV-C-"+WY$;GOSUB5190 

GOSUB4620 

4560 BB$="DEC-O"4WY$:GOSUB5190 

GOSUB4620 

4570 PRINT: PRINT" END OF FILES 

4580 FOR X=l TO 80:PRINT#-2,"-"; 

:NEXT X 

4590 PRINT#-2,"" 

4 600 PRINT#-2 , "TOTAL" , , , , ; PRINT* 

-2,USING"$$###t,##";TC 

4610 FCRX=1TO500:NEXTX:GOTO40 

4620 PRINTBB$ 

4630 OPEN"I",#l,BB$ 

4640 INPUT#1,N,FCS 

4650 FORJ=lTON 

4660 INPUT#1,T$[J),D$(J),P$(J),S 

$(J),A(J),F${J) 

4670 NEXTJ 

4680 CLOSE* 1 

4690 FORJ=1TON 

4700 IF LEFT$(AA$,3)-LEFT$(P${J) 

, 3) TH£NPRINTt-2,T$ (J) ,D$ (J) , P$ (J 

) , S$ (J) , jPRINT#-2,USING"$S####.| 
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#";A(J) 

4710 IF LEFTS(AA$,3)-LEFT$(P$(J) 
,3) THEN TC=TC4A(J) 
4720 NEXTJ 

4730 POKE 35, 127: POKE 36,234 
4740 RETURN 
4750 FORK-ITONK 
4760 AM(K)=VAL(AM$(K)) 
4770 PRINTf-PN, K" #*US(K) , :PRIN 
T#-PN,USrNG"$$##*#.#*"?AM(K) 
4780 IFCP$="3"THENGOTO4850 
4790 IF K=11THEN GOSUB 4890 
4800 IF K=25THEN GOSUB 4890 
4810 IF K-39THEN GOSUB 4890 
4820 IF K-53THEN GOSUB 4890 
4830 IF K=67THEN GOSUB 4890 
4840 IF K=81THEN GOSUB 4890 
4850 NEXTK 

4860 GOSUB 4890:GOTO2910 
4870 INPUT"TO CHANGE ENTER FIRST 
NUMBER" ;XS 
4880 IF XS>NK THEN GOTO 4870 
4890 IFCP$="3"THENRETURNELSEPRIN 
T"PRESS<ENTER>TO CONTINUE" 
4900 INPUT" ENTER FIRST DIGIT TO 
CHANGE" ;XS$ 

4910 IF XSS=""THEN RETURN 
4920 IF VAL(XS$)>NK THEN GOTO 49 
00 

4930 IFXS$="S"THENGOTO5120 
4940 IFXS$="C"THENGOTO5130 
4950 IFXSS-"D"THENGCTO5140 
4960 IFXS$="E"THENGOTO5080 
4970 IFXS$="F"THENGOTO5090 
4980 IFXS$="G"THENGCTO5100 
4990 IFXS$="H"THENGOTO5110 
5000 CLS:K=VAL(XS$) 
5010 AM(K)=VAL(AMS(K)):PRINT"#"U 
S(K) f :PRINTUSING"$##*.*#",-AM(K) 
5020 PRINT: PR INT" 1>T0 CHANGE NUM 
BER" : PRINT" 2>TO CHANGE AMOUNT" : P 
RINT"3>TO CONTINUE": PR INT: PRINT" 
MAKE SELECTION 1-2-3 
5030 C$=INKEY$ 

5040 IFC$="1"THENGOTO5060ELSEIFC 
$-" 2" THENGOTO5070E LSE I PCS -" 3"THE 
NRETURN 
5050 GOTO5030 

5060 PRINT: INPUT" TYPE NEW NUMBER 
•;U$(K):CLS:GGTO5010 
5070 PRINT: INPLTTTYPE NEW AMOUNT 
■;AM$(K) :CLS:GOTO5010 
5080 INPUT" ENTER NEW CHECKS TOTA 
L"?ST:GOTO2920 

5090 INPUT"ENTER NEW DEPOSITS TO 
TAL";SD:GOTO2920 
5100 INPUT* ENTER NEW INTREST" jSN 
:GOTO2920 

5110 INPUT* ENTER NEW SERVICE CHA 
RGE";SC:GOTO2920 

5120 INPUT* ENTER NEW STATEMENT B 
AL f ";SA:GOTO2860 
5130 INPUT"ENTER NEW NUMBER OF C 
HECKS" ? CN : GOTO2860 
5140 INPUT"ENTER NEW NUMBER OF D 
EPOS ITS" ; DN :GOTO2860 
5150 INPUT*NEW CHECKBOOK AMOUNT" 

;A(J) 

5160 CLS £ PRINTS 2 36, "WORKING" iGOT 

03250 

5170 INPUT'NEW STATEMENT AMOUNT* 

;AM$(K) 

5180 GCTO5160 

5190 S*3 

5200 DSKI$0,17,S,A$,B$ 

5210 G$=BB$ 

5220 J$=«ID$(A$,33,8) 

5230 IFGS=J$THENRETURN 

5240 H$=WID$(A$,1,8) 

5250 IFGS^STRENRETURN 

5260 E$=MID$(A$,65,8) 

5270 IFGS=E$THENRETURN 

5280 I$-MID$(A$,97,8) 

5290 IFGS=I$THENRETURN 

5300 IFFL=0THENAS=B$:FL»1:GOTO52 

20 

5310 S-S+lsFL-0 

5320 IFLEFT$(A$,1)=CHR$(255)ANDS 
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>10THErK;OTO4570 

5330 GOTO5200 

5340 PCLEAR1:GOTO20 

5350 FORX=1000TO1010 

5360 READr\:PQKEX,A 

5370 NEXTX 

5380 POKE383,12fitPOKE384,3:POKE3 

85,232:POKE422,126;POKE423,3:POK 

E424,232 

5390 DATA52, 16, 142,0,1 

5400 DATA189, 167, 211,53 

5410 DATA16,S7 

5420 RESTORE :GOTO5480 

5430 INPUT"NEW CHECKBOOK NUMBER* 

;T$(J) 

5440 GOTO5160 

5450 INPUTNEW STATEMENT NUMBER" 

r"US(K) 

5460 GOTO5160 

5470 CLSrPRINTf 224, "DISK FULL RE 

PLACE DISK": FORX-1T01 500 :NEXTX:G 

OTO40 

5480 CLS:POKE1003,125 

5490 DIR 

5500 POKE1003,0 

5510 PRINTS PRINT" FREE GRANULES*" 

;;PRINTFRE£(0) 

5520 PRINT" PRESS<M>TO GO TO MENU 

5530 C$=INKEY$ara="M"THENGOT04 

0ELSEGOTO5530 



THIS 'N THAT 

Coot IrtJ*) tro* p*oe I 

With the knowledge that '68* Micro 
Journal was not reaching the majority 
of the Color Computer Users due to 
it's advanced level of material, we 
began seriously considering publishing 
a *pure Color Computer* magazine also. 
At the time, there was a couple of 
well established Magazines already on 
line, and several more "coming out*, so 
we decided to see what would happen 
(relying on a single manufacturer and 
a single computer to support 5 or 6 
magazines seemed a little shaky) . The 
decision to go ahead with the Color 
Micro Journal was based on many 
factors. 

There have been many rumors floating 
around about what Radio Shack will do 
with the Color Computer and 
compatible computers, from dropping 
the Color Computer to a new "Super" 
Color Computer. The normal Radio 
Shack policies of not releasing any 
SOLID information on their future 
plans leaves any one relying on their 
products with the feeling that they 
are skating on thin ice. Witness the 



IBM PC; the day it hit the store, 
there was a LARGE amount o£ Software 
and Hardware available for it. why? 
Because IBM released the information 
needed by those that were going to 
provide Independent support for the 
computer in time for it to have a 
viable base of Software and Hardware 
WHEN the computer was available. The 
Color Computer floated along for a 
YEAR before MUCH decent Software 
became available, and about the time 
we start seeing some decent Software 
for it, they change the ROMs and it is 
back to the drawing board for a lot of 
the writers. It should be evident by 
now, to ANYONE, that the amount of 
OUTSIDE Software and Hardware support 
available for a personal computer 
system has a MAJOR effect on it's 
sales potential. I think we will see a 
so-called "Super" CoCo from Radio 
Shack in the future, but that is only 
my OPINION. They sure will be missing 
the boat if they DON'T make some "real 
use* of the 6809 Systems. 

It IS fairly certain that they will 
announce a 64K Color Computer which 
will sell for $399; possibly around the 
end of July. We also think that they 
will announce the availability of the 
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STAH-KJBBITS 
I'd like to thank All of you who stopped by our booth at the 
Color Computer show in Chicago in April. I certainly 
enjoyed meeting so many old (fiends and new customers, 
and had a delightful time We even managed to fcven up the 
last day of the show by raffling away a TV set and holding a 
Dutch auction, Sure hope there's another show soon! 

If you have a disk system, Td like to urge you to use the 
verify option. Before saving to ihe disk, type VERIFY ON 
(or include it in a program). After the disk system writes to 
the disk it reads the data back to make sure it was written 
properly. White this really slows everything down, it's a 
worthwhile precaution to help guard against loss of 
programs or data- (Quite common in other systems, too. I 
Several customers have asked about our update pokey. 
h's fairly simple: within 90 days of purchase, an update is 
free — just return the original disk or cassette , After 90 days 
an update costs $10 (to make things interesting, we will also 
accept one pre 1965 silver dollar.) 

We also have a liberal policy on software upgrades. If you 
now own HUMBUG or STAR DOS, we will give you full 
credil toward the 64K versions- Thai means that 64K 
HUMBUG will cosl you just 120 more, while 64K STAR 
DOS wil cosl you just J25 more. 

What, you say, rs so special about the 64K versions? 
Quite a bit, STAR DOS 64, lor example, provides upper and 
lower case display with 40. 51, or 64 characters per fane; it 
can be used with 35 , 40- or 80 track drives, single or double 
density, single or double sided But, aside from the fact that 
it provides a simple, straightforward interface to the disk, a 
very interesting aspect is its compatibility with other 6809 
operating systems, For example, many programs written ! 
lor FLEX"" (a trademark of Technical Systems Consultants < 
Inc.) will also work with STAR DOS 64 We are using TSC's ' 
teal editor and macro asscmber with STAR DOS right now. J 
They work just fine, but the big difference is that their disk « 
formal is compatible with other software lor Ihe Radio ' 
Shack dak system. 

As to 64K HUMBUG, that 's an intersimg story too. This I 
HUMBUG runs as a utility under either STAR DOS 64 or * 
Flex (that's right, Ihe same HUMBUG runs with either — it \ 
even runs on bigger systems using Flex.) Thai makes • 
HUMBUG unique — if rs the only monitor thai runs under ■ 
Color Computer Flea. HUMBUG provides all the facilities ! 
that are needed for machine and assembly language a 
programming and debugging in a 64K environment You ■ 
can start and stop programs, insert breakpoints, even a 
singk? step through programs, There a just no other way to ■ 
do these things in a 64K Color Computer? ■ 

One of the problems with a monthly column is keeping up t 
with publishing deadlines As you probably noticed last a 
month. I have already falen behind. But at least there is one • 
consolation — the sooner you fall behind, the more lime you t 
have to catch up. See you next month. ■ 



SPELL "N FIX 

Regardless of whose i»«i prcKvucw ynu uw, lei SPELL 'N FIX hud 
.arid I'm vnur spelling and J wing mistake-* ll reads text laslei lli.in 
you can, and spots and corrects errors even e ipt'rH'ih id 
proofreader* miss, ll is compatible with .ill Cult* CcMtqnUn tinrt 
processors J69 29 in the Radio Shack disk or contrite versium. 
989.29 in the Fir* version (20,000 word chclwrwry is bi.ind.ud. 
ofiimn.il 75.000 word Super Dictionary tuUb $MJ .Klcliinni.il I 

HUMBUG — THE SUPER MONITOR 

A compkie monitor and debugswg system which lets yuu m ipui 
programs and data inio memury, li^i memory content's. im*m*i r 
mghipW breakpoints, vnyk> slvp, Itrsl. uh*i k»um. ,>ii«l . «mi|»-,«i- 
memory contents, find ddld in memory, start and slop programs, 
ulilihidandduwiikhid.Mvr lt>i.ipe. connect theCukit Ccmi|Hii<-i in 
.1 u-rik«i.ii. innler, in h'mhmy cor»|HiM, and mm* MUM I Hi K»tm 
***k or ftHMtte cusas pusi JfcW.'ft. ip*\ial &4K wiuun k* FLUtu 
STAR DOS 64 costs $5995 

STAR— DOS 

A Dish Operaliny System specially designed lor Ihe Otkt 
Computer , STAR DOS <s fully compaiejk" with your pre&ertr Cut* 
Comp.ii.-r disk formal >r n-dria disk, writlrn l«v Fxu-iak-il Ifc-k 

Una ,iinl »f wrsj STAR DOS lor IbK m .t'JK nyblillfc, tin* 

J4990; STAR DOS 64 to. MK iV *irms costs 174 « 
STAR FLEX 

The he»r mvlemenlaiBin <>l FLEX tor ihe Colon C r .|.i. r 

Complete wiih oil utilities. ie»i ed«ior. macro jMemhtet, ,ml 

HUMBUG debug munivi. $2b0 00. 

ALL IN ONE - Editor Elc. 

Three program* m one - d Ml (unction Editor, a Tent Pr«* . ,-. .i 
and a Mailing List, Label program All ih« tor just ISO ftfthitfX 
STAR DOS and J2K, or STAR DOS 64, or FLFX. bpeciy wlm li 

DBLS for Dal a Ha*e» 

DBLS standi lor f\»U Base Lookup System A super i.i»i *v»k-m 
Ilh ■*■ jrihiiHj lor a seiVc led record wi a sequrnn.il duk I Je Sui^livd 
wiih SPELL 'N FIX s 20.000 wuid dk honar v as a sampk- data Re 
lets you look up the t.p*Itno. <A ai*y wwd in under FOUR HKWid*- 
Pm-ed al 1?9 95 Rei|uire» STAR DOS 

CHECK TS TAX 

Home acrotmting package combines chet WmkhV nwinleivim e .«nd 
irkutne ta* d,n,i cnhrlkM Written in Bask lor e4lrM FIS Disk <* 

F I. • .. tM) 

REMOTERM 

KLMOI LHM imikes youi CkiCuiMua bwli iMvuhn .ttpefiiMl 

from .i remole 1cimm.il $I9°6. 

PVEWTALK 

NI.WIALK a riHiiHiry numsc utility he imhIimb< L*,.ii.... f 

prtxir^mmerb <*h* h read* n«i memory conienl* Ihruuyli iJ-« IV 

set suejker $20 

SHRINK 

SHRINK iHjr version ol Eli a*, in tnacNnv iM^aa^e .nid 
ejetremefy last. $JS. 

EDUCATIONAL SOFTWARE 

bilrodWiKm in Numeric .J Mrihod» - culruy Urwt course ml 
<omp*iler nuih, $75 00 

w k - A-vefl ush. ilnik, COD, Vba, i« Unu-t Caid NV Si.ii.' 
ii-wnViiis ple.EM- add appruprhiie sales, Ian. 
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OS -9 Operating System at the same 
time* Trie new Radio Shack Price List 
contains a Part Number 26-3030 with a 
list price of $69.95, and a Part 
Number 26-3036 with a list price of 
$99-95. Although there is no 
description of either of these parts, 
we understand that P/N 26-3030 is the 
OS-9 Operating System including the 
Editor, Assembler, and DeBug. This is 
a Standard OS-9 Level 1 System except 
that the Disk Format is different from 
that used by GIMIX, HELIX, etc, P/N 
26-3036 is thought to be BASIC09. 
The features of BASIC09 are almost 
unbelievable. It is an extremely fast 
BASIC Language that was developed 
specifically for the 6809, and will run 
standard BASIC instructions and 
programs while ALSO having the 
capability of running most Pascal 
Programs WITH VERY LITTLE CHANGE. It 

includes a powerful text editor, 
multipass compiler:, a run-time 
interpreter, a high-level interactive 
debugger, and a system executive* 
WOW! I OS-9 and BASIC09 are products 
of Microware Systems Corp. (see 
Advertisement this issue). 

OS-9 is an extremely POWERFUL 
Operating System which supports many 
UNIX style operations. This ALSO 
means that it is an EXTREMELY COMPLEX 
Operating System. If you are just 
learning to get along with the Radio 
Shack Disk Operating System, or the 
FLEX Disk Operating System, be ready 
to spend a LOT OF TIME learning to use 
this System. I'm NOT suggesting that 
you do not get OS-9, 1 just want you 
to begin WITH TOUR EYES WIDE OPEN. If 
Radio Shack can come up with a set of 
Manuals to make the use of this 
Operating System understandable to 
the new computer user, THEY WILL HAVE 
ACCOMPLISHED THE COUP OF THE CENTURY. 

If you are an old hand with UNIX, you 
will have little problem. One thing is 
tor certain; you will be the Big Mam On 
Campus when you get OS-9 running on 
your "little old Game Machine". 

Then there is the "Baby CoCo", or the 
Model 10. This one is a puzzle! 
Rather than sticking with the 6809 
Chip with SOME compatibility with 
something they already have, they go 
off on a tangent and install a 6803 
CPU. Don't get me wrong, the 6803 is 
a good Chip, but NO ONE that was 
supporting the Color Computer has a 
6803 Assembler, or was ready in any 
other way to support that computer. 
Also, as is normal, Radio Shack is not 
using much of the 6803's capabilities 
in the Model 10, "The Word" has it 
that that computer was to be 
competition for VTC-20S, Sinclairs, 
etc. Well, it COULD be a lot more 
computer than either of those 
machines WITH THE PROPER SUPPORT!! 
But, "The Word" also has it that they 
did not expect the Sinclairs to go 
down to $25 in K-Marts, etc., and that 
they only produced ONE production run 
of the Model 10 and are undecided what 
to do with it now (see what the 
problems are with NO SOLID INFORMATION 
from Tandy - would YOU want to invest 
MONTHS of YOUR time and several 
hundred dollars to support a computer 
that you had "heard" may not be 
continued long enough for you to even 
get your product on the market??). 

We DO KNOW where DRAGON DATA expects 
to be in the next year. First, in 
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partnership with TANO CORP. at 4301 
Poche Court West, New Orleans, LA 
70129, there will be a 64K DRAGON 64 
available in early August which will 
sell for $399 and be set up for the US 
TV Systems with an RS-232 Port for 
compatibility with the RS Color 
Computer. THEY are actively pursuing 
getting OS-9 running on the DRAGON 64 
(target availability is Sept - Oct 
'83), and TANO will also be selling 
other ALREADY ANNOUNCED products 
such as a twin 6809 based Computer 
aimed at the Business and Educational 
Market, DRAGON DATA has also 
announced a computer (targeted for 
next year) that will have a unique bus 
structure which will run 68000-based 
and 8086-based software either 
individually or both together. (The 
above information came from an 
interview with Tony Clarke, Dragon 
Data's managing director, as published 
in the July 1983 Issue of DRAGON USER 
- distributed by SM Distribution, 16- 
18 Trinity Gardens, London SW9 
England.) 

Between the Radio Shack "rumors" and 
the announcement from Dragon Data, it 
appears that at least something 
similar to a Color Computer, as we 
know it, will be around tor a while. 
Let me add that Radio Shacks history 
leads one to believe that any new 
"Color Computer" will at least have 
some compatibility with the Color 
Computer that we now know, and that 
they will NOT drop ALL SUPPORT for it 
(they are still providing some support 
for the Model I) . 

Since it appears that there will be 
something to build a magazine around 
tor the next tew years, what can Color 
Micro Journal accomplish tnat is not 
already being covered by other 
magazines? For starters, our 
connection with ■68' Micro Journal 
gives us an edge in providing 
information about the new Operating 
Systems that will be available tor the 
Color Computer and Dragon Systems; 
FLEX (which has been running on the 
Color Computer tor a couple of years 
now, and is the Operating System that 
has a MULTITUDE of readily available 
Software including major Data Base 
Management Systems, Business 
Programs, Word Processors, 
Programming Languages, etc.), OS— 9 (a 
Multi-Tasking Operating System similar 
to UNIX), and possibly UniFLEX (a 
Multi-User Multi-Tasking Operating 
System which Is a little more similar 
to UNIX) . We also feel that there is a 
need for a Magazine that will allow 
advertising at a rate that new 
producers of Color Computer products 
can afford; a need for a Magazine that 
has INFORMATION for new users as well 
as the "old pros"; a Magazine that 
helps YOU learn MORE about your 
computer, what is AVAILABLE tor it, 
and HOW TO USE what IS available for 
it. The major thrust of Color Micro 
Journal is toward USING your 
Computer . 

Color Micro Journal is a Magazine 
FOR Color Computer USERS 
BY Color Computer USERS! 

We, the staff of Color Micro Journal, 
need YOUR help in making this a 
Magazine for YOU. Believe it or not, 
what YOU are interested in is the same 
thing that several thousand OTHER 



Color Computer Users are interested 
in. The questions YOU h»/e are being 
asked by thousands of others. It is a 
well know fact that the majority of 
the GOOD Software is developed by a 
Personal Computer User that had a 
problem to solve, and did not have to 
solve it within a limited period of 
time to be able to put food on the 
table. If you have developed a 
Program to solve a problem, pass it 
on; it is just what some other Color 
Computer User needs. If you have 
developed a Hardware Modification, 
send it in. Trying to get the 
Computer turned on? Drop us a note; 
we'll publish it and you may be 
surprised at how many replies you will 
get, and how many different ways a 
computer can be turned on. Seriously, 
if you are stumped, yell for help! The 
Color Computer has been in the field 
long enough that the large majority of 
the problems have been solved by 
SOMEONE, conversely, if YOU have 
solved a problem, send that solution 
in; it will help a LOT of other users 
who hdf>/e the same problem* 

The "Tabloid" Format of Color Micro 
Journal was chosen for several 
reasons. First, is drastically 
reduces the cost of printing a 
magazine, which we can pass on to the 
Readers and Advertisers. Second, it 
drastically reduces the lead time 
required for actually printing the 
magazine, providing the most up-to- 
date information to the reader. 
Third, it is easier to read than a 
"glossy" page. And, fourth, it is a 
"relaxed, informal" medium o£ 
information transfer that we hope will 
be the hallmark ot the Color Micro 
Journal Magazine, We hope to minimize 
OUR work by publishing your 
submissions just like we receive them. 
This helps YOU, the reader. In two 
ways; we need less staff, meaning 
lower magazine costs, and, more 
important, there is MUCH LESS CHANCE 
FOR ERRORS in Programs, Articles, 
etc., that you read. As I said. Color 
Micro Journal is a Magazine FOR the 
Color Computer USERS BY the Color 
Computer USERS. All we are doing here 
at Computer Publishing Inc. is 
providing YOU with a vehicle and 
central location for SHARING 
INFORMATION. The material YOU 
provide, and the questions YOU ask, 
determine WHAT goes into YOUR 
Magazine. 

OK; what format can we work with 
effectively? We can work with ANY type 
of ASCII Format - a DATA File on Color 
Computer Tape or Disk, a .TXT File in 
FLEX Format, etc. Of course, we can 
easily work with either a Tape or Disk 
BASIC Program, If you have a Word 
Processor and can send an ASCII File 
from it on either Tape or Disk, no 
problem. If not, then send any text 
(again, if you are also sending a BASIC 
Program, just send the Program in 
Binary Format on Tape or Disk), either 
Typed or Printed (WITH A GOOD RIBBON) 
with a MAXIMUM of 40 Characters per 
Line (no more than 4.0 inches wide), 
single spaced, and we can take it from 
there. If you have a question, drop 
me a line. What kind of Programs and 
Articles are we looking for? ANYTHING 
relevant to the present or future 
"Color Computer" types of Computers; 
the Model 10 "Baby CoCo", the TRS-80C 
Color Computer, the DRAGON and its 
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ancestors, etc. Remember, these 
computers are being purchased by new 
owners every day, so what may seem 
like "old hat" to you may be just 
exactly what THEY need to know. 
Hopefully, there will be something for 
every one in each issue; from the 
basics to advanced Machine Language 
information, covering both Hardware 
and Software. Again, if it interests 
YOU, there are a lot of other people 
In the SAME boat. 

One of the most popular sections of 
the '68' Micro Journal over the years 
has been a section of the Magazine we 
call the "Bit Bucket". This section 
consists of letters, short programs, 
routines, etc., THAT ACCOMPLISH SOME 
TASK. We will install a section like 
the "Bit Bucket" in the Color Micro 
Journal, and will give you a minium of 
a 6 MONTH EXTENSION to your 
Subscription for the Color Micro 
Journal for any short program, 
routine, operating hint, hardware fix, 
or whatever, that we accept for 
publication (many of the subscribers 
to '68' Micro maintain their 
subscriptions in this manner) . Get on 
the band wagon and send in your 
"secrets* TODAY! 

I hope you find some useful information 
in Issue Number 1 of Color Micro 
Journal. Let us know what you like 
and dislike; the Magazine will be as 
good as YOU make it. 

Robert L. Nay 
Editor 



COMPUTER 

TAPES? 



■hen X started, learning about computer* 
in general and Co Co in particular it 
seesed the aoat natural thing In the 
•aria to use cassette tapes and record- 
era to store information. This likely 
had something to do with tha fact that 
I was doing a lot of Gustos cassette re 
cording and duplicating. And the truth 
is that I am still Intrigued by the use 
of such simple and fairly inexpensive 
systems with relatively powerful compu- 
ters. 1 think even more could be done. 

Eut, there are a few things that seen 
to get overlooked by some folk a whose 
only exposure to cassette may have been 
In computer applications. I'll try to 

note sons of the thing a that may be 

helpful to the non-audio user. 

One of the first things that ceught ay 
eye was that programs were being devel- 
oped and sold to solve various problems 
that can occur when trying to make cop- 
ies of certain programs. As a computer 
neophyte, I don't pretend to understand 
Just what the problems are. I'm so new 
the warrantee hasn f t even run out on ay 
first computer * a CoCo, of course. But 
1 do know that regardless of the nature 
or format of the save, almost any half 
decent cassette recorder with a patch 
cord or two from your nearest audio or 
electronics shop will copy, sound for 
sound, whatever is on your tape to or 
from another similar reccrder, 

Tou nay have to experiment with various 
comb lnati one of volume and tone - yea I 
aaLd tone - controls. But, sooner or 
later you will find a combination that 
works. After I get one to work I like 
to experiment further to find the upper 
and lower limits of usable settings and 
use settings that are in the middle of 
the range. Tour owners manual should 
tell you ho* to record froa other mach- 
ines. On leas expensive ones the AUX 
input will often record from earphone 
or speaker Jacks. First, try copying 
music or voice. If it sounds clean it 
should work for computer tapes. 



Oh yes! Don't forget to write down the 
combination that works, when yon find 
it. 

I mentioned that tone controls might 
make a difference in your success. Of 
course, some of you don't even have any 
such controls. But, Just because you 
can't change your bass or treble, don't 
give up yet. Although the presence of 
tone controls often indicates a better 
quality recorder this is not always so. 
Even if your recorder is not a better 
quality machine chances are that yon 
can still find a combination that will 
work. As a matter of fact, you may 
benefit from the considerable differ- 
ences aoaetiaes found between one taps 
and another. Some tapes are obviously 
more baas or treble than others, given 
the same recording conditions, usually 
a treble sounding tape will give a good 
boost to the upper voltage. On really 
good systems it us usually better not 
to use Dolby and other equalisations. 

Speaking of differences in tapes, I 
find the idea of paying near three dol- 
lars for a "computer tape" spelling. 
There are definitely different quality 
tapes. But, the tape that can't handle 
the frequency requirements of cassette 
1^0 probably hasn't been made. And 
other requirements have really little 
to do with computers. I am referring 
to requirements like leads rices tapes. 

Personally, I almost prefer having a 
leader tape over a leaderless one. 
With a leader tape I can start the 
recorder (in record node) on the leader 
and aa it sweeps onto the tape 1 am 
sure it has erased anything that may 
have been near the beginning. 3ir.il- 
arly, I continue on record a short dis- 
tance beyond the end of a save, thia 
removes any unhealthy a pikes froa tha 
area. Also, if I want to locate that 
segment by listening the specs will 
both identify the end/start and leave 
room for hand que lag. 

My next point appliea to recording of 
any kind, hegardless of the name on 
the package, if the tape has a dull, 
rough finish on the oxide side (the 

aids feeing out in a cassette) lt»a like 
running fine sandpaper over one apot on 
yaur recorder. It will wear a groove in 
head or heads much earlier than normal. 
Whan I am buying tape the very first 
tning I look for is this smooth shiny 
finish on the side you normally see in 
the csssettes ports. Not Just on tha 
back which is almost always shiny. 
Finding s good finish is usually a pro- 
blea with "dims store - packs. I don't 
even look at then any more. 

Where can you buy economical tapes that 
are worth having? Audio supply houses 
all over are advertising tapes. If you 
can get a look at them you may do quite 
well at as low aa fifty cents each. If 
you have a club or several friends you 
can buy In boxes of a hundred and get 
such prices. Ask what different tapca 
they have and keep an eye open Tor tha 
ascoth finish. Try a couple before you 
buy a lot, Sometiaaa you can get low 
level tapes that don't put out the same 
volume as others. Ask about thia too. 
Alao, you will find that usually cas- 
settes put together with five screws 
are pretty mechanical quality and laaa 
apt to jam. 

Froa time to time I see a suggestion 
in an article that you record nothing 
over the space you expect to use then 
go back and do the save. If your eraae 
head isn't too affective thia can be 
a real help. If you have a record vol- 
ume control set it at sere while doing 
tnia. Since this takes a lot of time 
and since I have a good bulk eraser I 
always run my tapes over it before 1 uae 
them. But. good erasers are expensivs 
- from about seventy five dollars up. 
Most of the cheaper permenant magnet 
type erasers are a little marginal for 
fidelity sound but they should be a 
big help at computer frequencies. 

Since there are so many types, kinds, 
brands etc. of cassette recorders it 
is lapossible to bs specific in an 
article like this. But, by and large , 
if a recorder sounda good it will do 
well with computer work - given tha 
proper connections. Holey scratchy 
sounding machines will bs a pain. 
Happy recording. 



Jim La Lone 
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BASIC 

Users Notes 

CoCo VARPTR Cor Non Extended Systems 

As those of you who have non-extended 
CoCo's know, there are many nice 
additions to the CoCo Basic, that 
extended basic gives you. One ot 
these nice additions is the VARPTR 
command. This command, returns the 
memory location where a given variable 
is stored. This is useful in a variety 
of ways. For instance, if you are 
doing a sort, you can look up the 
string variables in memory, and 
instead of physically moving the 
strings around, you can simply change 
the pointers to where the strings are 
stored. This avoids garbage 
collection delays as well as makes 
your program run faster. An other 
use for the command is to access the 
floating point variables, for direct 
manipulation in order to do more 
efficient floating point operations, 
such as multiply and divide 
instructions. 

The use of varptr, allows all kinds of 
neat things to be accomplished. Well, 
now that we know a little about the 
possibilities, let's delve into just 
how we can accomplish this magic. As 
some of you may remember from my first 
article, there exists a subroutine in 
the CoCo roms, that will find a 
variable. The routine is called 
FNWAR, and it looks up a variable in 
the symbol table, and returns it's 
value* It it is not tnere, it will 

allocate it. Now that last point 
bears repeating, if it is not there, it 
wil be allocated. Bingo, we can now 
create basic variables from within a 
machine code program, directly, and 
without basics' being the wiser. We 
can use this to assign values to 
strings and things. There are two 
ways to set up varptr* One uses a 
exec or usr call, and the other, 
doesn't need any machine code. 

Since I am particularly fond of machine 
code, let's attack the first one* It 
will be reasonable, to assume that we 
can have two basic variables for our 
exclusive use, so we will use VA 
(variable address) and VN$, (variable 
name string). To use the routine, we 
first set VN$ equal to the variable 
that we need the address of, and then 
call our machine language program. 
The program will then return the value 
of the location of the variable in the 
variable VA* We will not bother to 
lookup elements in an array at this 
time, we will work on that later as 
your understanding of how basic works 
improves. Listing 3 is a simple basic 
program that will load our code into 
memory, and get it ready for 
execution. Listing 2 is the actual 
machine code program that does the 
work. We will be using a new rom call 
this time. It is called STORFP, and it 
transfers the primary floating point 
accumulator to the memory address 
that is pointed to by the X register. 
This will be used to set the value 
back into the basic variable VA. 

In a previous issue of 68 Micro 
Journal in an article on using USR, we 
touched on the other routines that we 
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TEN MOST-ASKED QUESTIONS 

about DYNACALC 

THE ELECTRONIC SPREAD-SHEET FOR 6809 COMPUTERS 



1. what Is an electronic spread-sheet, anyway? 
Business people use spread-sheets to organize 
columns and rows of figures. DYNACALC simulates 
the operation of a spread-sheet without the mess 
of paper and pencil. Of course, corrections and 
changes are a snap, changing any entered value 
cause* the whole spread-sheet to be re-calculated 
based on the new constants This means that you 
can play, what if? to your hearts content. 

2. is DYNACALC Just f or accountants , then? 

Not at all. DYNACALC can be used for just about any 
type of job. Not only numbers, but alphanumeric 
messages can be handled. Engineers and other 
technical users will love DYNACALC s sixteen digit 
math and built-in scientific functions, you can build 
worksheets as large as 256 columns or 256 rows. 
There s even a built-in sort command, so you can 
use DYNACALC to manage small data bases — up to 
256 records. 

3. What will DYNACALC do for ME? 

That s a good question. Basically the answer is that 
DYNACALC will let your computer do just about 
anything you can imagine Ask your friends who 
have visicaic™, or a similar program, just how 
useful an electronic spread-sheet program can be 
for all types of household, business, engineering, 

and scientific applications Typical uses include 
financial planning ana budgeting, sales records, 

bills of material, depreciation schedules, student 
grade records, job costing, income tax preparation, 
checkbook balancing, parts inventories, and payroll. 
But there is no limit to what YOU can do with 
DYNACALC. 

4. Do I have to learn computer programming? 

NO! dynacalc is designed to be used Dy non- 
programmers, but even a PhD in computer 
Science can understand it. Even experienced 
programmers can get jobs done many times 
faster with dynacalc compared to conventional 
programming Built-in help messages are provided 
for quick reference to operating instructions. 

5. do I have to modify my system to use DYNACALC? 
Nope. DYNACALC uses any standard 6809 config- 
uration, so you don t have to spend money on 
another CPU board or waste time learning another 
operating system. 

Order your DYNACALC today! 



Foreign Dealers; 

Australia & Southeast Asia: order from Paris Radio Elec- 
tronics, 161 Bunnerong Road (PO Box SSG> Kingsford, 
2032 NSW Australia Telephone: 02 344 91 11 



united Kingdom: order from Compusense, Ltd,, 
Box 169, London N13 4HT, Telephone: 01-882-0681 



PO 



$, Will DYNACALC read my existing data files? 
you bet! DYNACALC has a beautifully simple 
method of reading and writing data files, so you 
can communicate both ways with other programs 
on your system, such as the Text Editor, Text 
Processor, sort /Merge, stylograph™ word 
processor, rms™ data base system, or other 
programs written in BASIC, C t PASCAL, FORTRAN, and 
soon. 

7. HOW fast IS DYNACALC? 

very. Except for a few seldom-used commands, 
dynacalc is memory-resident, so there is little disk 
I/O to slow things down. The whole data array 
(worksheet) is in memory, so access to any point is 
instantaneous, dynacalc is 100% 6809 machine 
code for blistering speed. 

8. is there a version of dynacalc for MY system? 
Probably, you need a 6809 computer (32k 
minimum) with FLEX™ r UniFLEX™, or OS-9™ 
operating system, you also need a decent crt 
terminal, one with at least 80 characters per line, 
and direct cursor addressing, if your terminal isn't 
smart enough for DYNACALC, you probably need a 
new one anyway. The UniFLEX and OS-9 versions of 
dynacalc allow you to mix different brands of 
terminal on the same system. There's also a special 

version of dynacalc for CqJoj; Q^mt&% ( myQR8& 
with flex (Frank Hogg or Datacomp versions). 

9. how much does dynacalc cost? 

The FLEX versions are just S200 per copy; UniFLEX 
version $395; OS-9 version (works with LEVEL ONE or 
level two) S250 Orders outside North America add 
S7 per copy for postage. We encourage dealers to 
handle dynacalc since its a product that sells 
instantly upon demonstration. Call or write on your 
company letterhead for more information. 

10. where do I order dynacalc? 

See your local DYNACALC dealer, or order directly 
from esc at the address below, we accept 
telephone orders from 10 am to 6 pm, Monday 
through Friday. Call us at 314-576-5020. Your visa or 
MasterCard is welcome. Please specify diskette size 
for flex or OS-9 versions. Software serial number is 
required for the UniFLEX version. 



Computer Systems Center 

13461 Olive Blvd. 

Chesterfield, MO 63017 

(314) 576-5020 




Scandinavia: order from Swedish Electronics hk ab, 
Murargatan 23-25, Uppsala S-754 37 Sweden. Tele- 
phone: 18-25-30-00. 



UniFLEX software prices Include maintenance for 
the first year. 

dynacalc Is a trademark of 
Computer Systems Center 

VtelCalc Is a trademark of vis i cor p 

STYLOGRAPH is a trademark of Great Plains computer Co 

RMS Is a trademark of Washington computer Services. 

FLEX and UniFLEX are trademarks of TSC. 

OS-9 Is a trademark of Mlcroware and Motorola 
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will use. For those of you who are 
just coming on-board, we will give you 
a quick review of those routines. 
Routine #1 is FLQATD. This routine 
will take a two byte value held in the 
D accumulator (a&b), and convert it to 
a floating point value. Routine 12 is 
the one that forms the guts of our 
program. It Is called FNDVAR. You 
set up for the call to this routine* in 
the following manner. You set the 
name of the variable desired into 
locations $37, $38, and then JSR 
$B38F. The location of the variable 
returns in locations $39 fc $3A. 
Variables are stored in memory, as two 
byte names, in the case of a numeric 
variable, the two bytes are stored 
just as they are given, that is in 
ascil without the high bit set. 
Strings are referenced on the other 
hand, by setting the high bit on the 
second byte of the string name. T 
think that the listings are conroented 
well enough for most of you to follow, 
so lets* get busy, and look them over. 

Listing 1. is a 94 byte machine code 
program, that does the magic that we 
need done. Basically it locates the 
variable VN$, then extracts the name. 
It then looks that name up, and saves 
the address. After locating the 
variable asked for, it looks up the 
variable VA, and then gets the 
location of the variable and converts 
it to floating point and shoves it into 
the variable VA. The STORFP routine 
resides at $BC35, and requires that 
the X register be pointing to the 
memory location to store it. 

Listing 2. is a simple way to 
accomplish almost the same result, the 
only, difference being, that It you 
reassign the located variable to a 
previously defined variable, it changed 
the location of the requested variable 
in the symbol table. One might force 
it to work, if he experimented with it 
long enough to discover just how the 
variables are shifted around, and 
found a way to compute the offset 
required in order to make it work. 
Suffice it to say, that as long as you 
are printing the result, whether from 
local mode, or from a program, the 
correct results will be obtained. 

Listing 3, is the basic loader for the 
machine code program. Be sure and 
type at least 96 **s r and do not leave 
any space between the line number and 
the REM statement. You should then 
goto line 20. When it ends, your 
machine code will be stuffed In the 
REM statement, and lines 20 onward may 
be deleted, and the routine used as 
needed. As previously mentioned in 
the first article, (published in 68 
Micro Journal), this technique of 
embedding machine code inside of a REM 
statement Is extremely handy. You can 
easily embed up to 250 or so bytes of 
code in a long remark statement, and 
if you are handy with a monitor, you 
can embed even longer programs. 
There are a couple of things to watch 
out for however. Since Microsoft uses 
a to end a line, your code CANNOT 
have a in it, as the interpreter will 
think that it is the end of a line, and 
set it's pointers up during a list, 
cleanly clobbering your code. You will 
note that there is a comment in the 
assembly listing about this. 













Listing 1. 












ORG 


$0D2C 


0D2F 


CC 


56 


CE 


START 


LDD 


#$56CE 


0D2F 


DO 


37 






STD 


$37 


0D31 


BD 


B3 


8F 




JSR 


$B38F 


0D34 


9E 


39 






LDX 


$39 


0D36 


E6 


84 






LDB 


0,X 


0D38 


CI 


03 






CMPB 


#03 


0D3A 


22 


48 






BHI 


ERROR 


0D3C 


AE 


02 






LDX 


2 f X 


0D3E 


CI 


03 






CMPB 


#3 


0D40 


26 


0C 






BNE 


NOTHRE 


0D42 


A6 


02 




THREE 


LDA 


2,X 


0D44 


81 


24 






CMPA #$24 


0D46 


26 


3F 






BNE 


ERROR 


0D48 


EC 


84 






LDD 


0,X 


0D4A 


CA 


80 






ORB 


#$80 


0D4C 


20 


19 






BRA 


GO 


0D4C 


CI 


02 




NOTHRE 


CMPB 


#2 


0D50 


26 


0C 






BNE 


ONE 


0D52 


A6 01 






LDA 


1,X 


0D54 


81 


24 






CMPA #$24 


0D56 


26 


0D 






BNE 


NOSTRG 


0D58 


C6 


80 




STRING 


LDB 


#$80 


0D5A 


A6 


84 




NXT 


LDA 


0,X 


0D5C 


20 


09 






BRA 


GO 


0D5E 


C6 01 




ONE 


LDB 


#1 


0D60 


SA 








DECB 




0D61 


A6 


84 






LDA 


0,X 


0D63 


20 


02 






BRA 


GO 


0D65 


EC 


84 




NOSTRG 


LDD 


0,X 


0D67 


DO 


37 




GO 


STD 


$37 


0D69 


BD B3 


8F 




JSR 


$B38F 


0D6C 


9E 


39 






LDX 


$39 


0D6E 


34 


10 






PSHS 


X 


0D70 


CC 


56 


41 




LDD 


#$5641 


0D73 


DO 


37 






STD 


$37 


0D7S 


BD B3 


8F 




JSR 


$B38F 


0D78 


35 


06 






PULS 


D 


0D7A 


9E 


39 






LDX 


$39 


0D7C 


34 


10 






PSHS 


X 


0U7E 


BD B4 


F4 




JSR 


$B4P4 


0D81 


35 


10 






PULS 


X 


0D83 


BD 


BC 


35 




JSR 


SBC35 


0D86 


39 








RTS 




0067 


7E 


B7 


06 


ERROR 


JMP 


$B706 






LISTING 2 







Doesn't matter, is pic code 

VN$. .name of where name needed Is 

Set up for FNDVAR 

Go look up variable. 

Point to the name 

Pick up length of string 

If >3, then invalid name, 

..so issue a function call error 

Pickup pointer the string. 

See if 2 character name; e.g. Al$. . 

Nope, just single letter ordinary. 

Pick up 3rd character of name 

Check for string 

If 3 and not string, then error 

Get name 

Set string 

Skip the zero operation 

If not 1 character then 

..see it second character is string 



Set up a string 

Get variable name and go find it 

Make a single character 

To eleminate 0's. We need a here 

Get the variable name 

Continue 

Get charcter name 

Set up for first, find it 

..and locate the variable. 

Get address. 

Save reqested variable address 

VA... .where to put it. 

Set up to find VA 

Look it up 

Get address back. 

Get address of VA 

Save it 

FLOATD, , .convert to £p. 

Get variable address back. 

Move tp accuml to memory 



$B706 Issue a function call error 



Woody Baker 



2 VA-0:VN$= B VA ,, :A=0;REW A= TEST 
VARIABLE, VA AND VN$ USED FOR 

3 REM THE SECOND METHOD. VN SHO 
ULD BE SET TO THE NAME OF THE 

4 REM VARIABLE TO LOOK FOR, 

5 REM LINE 20 IS AN EXAMPLE OF H 
OW TO DO VARPTR FROM WITHIN 

6 REM BASIC. ONE COULD DEFINE A 
FUNCTION TO RETURN THE 

7 REM VALUE. THE 65 IS "A", AND 
THE IS BECAUSE IT IS ONLY 

8 REM A SINGLE VARIABLE. ADDING 
128 TO THE ASCII VALUE OF 

9 REM THE SECOND CHARACTER OF TH 
E NAME, WILL LOCATE STRINGS. 

10 REM THE SECOND CHARACTER OF T 
HE NAME MUST BE POKED INTO 

11 REM LOCATION 56. LINES 30-50 
SHOW ANOTHER WAY OF LOOKING 

12 REM FOR A VARIABLE NAME. IT 
REQUIRES THAT THE NAME OF THE 

13 REM VARIABLE TO FIND BE HELD 
IN VN$, THE ADDRESS WILL BE 

14 REM RETURNED IN VA. 

19 REM 

20 POKE 55,65:POKE56,0:EXEC 4596 
7: PRINT PEEK(57)*256+PEEK(58);EN 
D 

29 REM. ...LOOK UP VA 

30 A=ASC(LEFT$(VN$,l)):POKE55,A 

31 A^ASC(MIDS(VN$,2,l)):POKE56,A 
:REM IF STRING THEN MUST HAVE 

32 EXEC 45967: REM THE HIGH BIT 
SET.,,VN$""A"-K:HR$(128): WILL LO 
OK 

34 PRINT PEEK(57)*256+PEEK(58):R 
EM ONLY CAN PRINT IT 
50 PRINT VARPTR{VA) ;REM FOR EXTE 
NDED BASIC CHECK 



LISTING 3, 

10 REM************************** 
******************************** 
******************************** 
****************** 

11 A=ltVA=0;VN$=-A"+CHR$(0) 

15 EXEC (PEEK(25>*256+PEEK(26)+5 
):PRINT VA 

16 PRINT VARPTR (A): REM AS A CHEC 
K FOR EXTENDED BASIC 

17 END 

20 I=PEEK(25)*256+PEEK(26)+5:REM 
INSTALL CODE... DELETE 20 ONWARD 
22 FOR J=I TO I+93:READA:POKE J, 
A:NEXTJ 

25 DATA 204,86,206,221,55,189,17 
9,143,158,57,230,132,193,3,34,75 
,174 

26 DATA 2,193,3,38,12,166,2,129, 
36,38,63,236,132,202,128,32,25,1 
93,2 

27 DATA 38,12,166,1,129,36,38,13 
,198,128,166,132,32,9,198,1,90 

28 DATA 166,132,32,2,236,132,221 
,55,189,179,143,158,57,52,16,204 

29 DATA 86,65,221,55,189,179,143 
,53,6,158,57,52,16,189,180,244,5 
3,16 

30 DATA 189,188,53,57,126,183,6 
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WHY 

COCO 

Can't READ 



INTRODUCTION 

As a software developer, I am 
sensitive to new systems, disk, drives, 
disk controllers, software, and other 
parameters which affect the market in 
which I sell my products. Users whose 
systems cannot read the diskettes 
that I send are understandably upset 
and call or write me quickly about 
such problems. Luckily, such problems 
have been rare. 

In the past, I have avoided most media 
interchange related problems by 
shipping 5.25" diskettes in a single 
sided single density 35 track, FLEX or 
0S9 format, and 8" diskettes in a 
single sided single or double density, 
FLEX, UNIFLEX or 0S9 format. I can 
make the diskettes flippies by 
punching extra index and write 
protect holes in the covers. This has 
proven generally very reliable over 
several years and over many new 
products, including several otherwise 
incompatible systems, such as CMS, 
Gimix, Motorola, Radio Shack, Smoke 
Signal, Southwest Tech, etc. 

Recently, I have had a rash of 
complaints from COCO FLEX users who 

could not read the diskettes 1 had 
attHt iHBM, AEtet saflfcui cation «ttH 
several of them and after trying 
several experiments on my own COCO, I 
now can ship diskettes to COCO users 
and be reasonably certain that they 
will be able to read the diskettes. 
This discussion attempts to share 
some of this information about the 
COCO disk problems and solutions. 

HARDWARE 

The disk-related hardware of the COCO 
is composed of the following major 
components: 

one to four 5.25" disk drives 

one disk controller cable 

one to tour disk drive power 

supplies 
one or more 5.25" diskettes 
one disk controller 

The Radio Shack supplied hardware for 
the COCO follows that company's 
general philosophy of providing minimal 
(or almost minimal) hardware at fairly 
high prices, and partially supporting 
this by designing it just incompatibly 
enough to make competition initially 
somewhat difficult. 

DISK DRIVES 

The Radio Shack supplied disk drives 
have the following attributes, when 
compared to the competitors' disk 
drives: 

single or double density 
35 tracks, not 40 or 80 

single-sided, not double-sided 
30 msec step rate, not 6 or 12 
no head load solenoid 
minimum filtering of read signal 

Color Micro Journal 



These specifications are for an almost 
minimal unit. The only item above a 
minimal disk drive is the capability of 
recording in double density mode, 
which some very early drives (initial 
SA400 production) could not do. The 
Radio Shack supplied software uses 
double density exclusively, although 
the drives are capable of single 
density* 

The provision of only 35 tracks, 
rather than 40 or 80, causes no 
direct problems other than the lack of 
storage, when using the Radio Shack 
supplied software, since it supports 
only 35 tracks and cannot use more, 
even it the drives actually have more 
than 35 tracks. It can cause media 
interchangeability problems if a Radio 
Shack supplied drive is used with FLEX 
or other software supporting more 
tracks on the disk drives. These can 
be minimized by interchanging 
diskettes with data restricted to the 
first 35 tracks on the diskette; 
however, the receiver of a diskette 
sometimes has no control over the 
format placed on the diskette by the 
sender. 

The restriction to single sided, 
rather than double sided, recording 
format causes essentially the same 
problems as does the restriction to 
35 tracks. The loss of capacity is 
much greater in this case, however, 
since adding another head to the drive 
doubles its capacity, and adding 5 
tracks only increases its capacity by 
one seventh. The diskettes may be 
safely made flippies, doubling the 
offline, although not online, capacity 

The slowness of the head step rate (30 
milliseconds) causes no problems 
except for materially slowing disk 
operations, especially those involving 
heavy use of random tile access. Many 
drives become very noisy when stepping 
at this slow a rate, but seem to work 
properly. 

The lack of a head load solenoid 
implies that the drive head is loaded 
whenever a diskette is in a drive with 
the head closed. This will increase 
media wear somewhat since all heads 
will be contacting the media whenever 
the motors are on, rather than only 
the head of a selected drive 
contacting the media. This also 
worsens the problems associated with 
turning power on and off when a 
diskette is in a drive, since the 
heads will be contacting the media, 
and not retracted. The Radio Shack 
software provides no head load 
settling time, since the Radio Shack 
supplied drives need no such delays. 
However, more sophisticated disk 
drives require head load delay to 
prevent occasional problems, 
especially when writing, due to initial 
bouncing of the head on the media. 
FLEX and other non Radio Shack 
supplied software provide head load 
delays, anticipating the use of drives 
with head load solenoids. If Radio 
Shack supplied software will be used 
to support a system with such drives, 
the jumpers on the drives should be 
selected in the HM (head load when 
motor on) mode, not in the HS (head 
load when selected) mode, to help 
prevent disk write errors and to 
reduce the number of read and write 
retries. 



The minimal filtering on the disk drive 
boards will cause the number of read 
and write retries and unreadable 
sectors on disk to be Larger than they 
would have been otherwise. Other 
drives provide one or more additional 
levels of analog and digital filtering 
on the drive boards, increasing the 
signal to noise ratio* A digital 
filter may be added to the disk 
controller board to compensate 
somewhat tor the lack of filtering on 
the disk drive boards; this is 
described later. 

DRIVE CABLE 

The Radio Shack supplied cable is not 
wired in a one to one basis. The 
drive 4 select line is in a 
nonstandard position on the cable. 
However, this cable may be used with 
non Radio Shack drives or standard 
cables may be used with Radio Shack or 
non Radio Shack drives by simple cuts 
and jumpers on the drive boards or on 
the disk controller board. For 
instance, if drive 4 select is being 
used for side select by non Radio 
Shack software (such as FLEX), but 
fewer than four drives are attached to 
the cable, the correct side select 
line may simply be jumpered to the 
drive 4 select line, either on one of 
the drive boards or on the disk 
controller board. 

POWER SUPPLIES 

The Radio Shack supplied disk drive 
power supplies are marginal, in terms 
of percent ripple, dip, and spike 
measures. They are not alone, 

Huweverj many *»t the mail-ordoF 4i»k 
drive boxes with power supplies (often 
costing $70 to $100) suffer from the 
same problems. There should be less 
than 1% ripple, dip, and spike 
variation in the +5 volt supply to each 
drive. The +12 volt supply is less 
critical but should not vary by more 
than 5% during normal operation. 

Many such power supplies suffer from 
false economy in terms of amount of 
capacitance provided for gross 
regulation, allowing both voltages to 
dip during motor power-up periods. 
Several supplies reviewed had less 
than 5000 MFd capacitance on each of 
the voltages. Substantially 
increasing this amount (to around 
20,000 MFd each) should improve 
regulation substantially, if the 
transformer is rated highly enough. 
Each drive should be assumed to 
require approximately 1 ampere at 4-5 
volts and 3 amperes at +12 volts 
during motor power-up, but only 1 
ampere during normal motor speed 
conditions. Thus, power supplies 
providing only 1 ampere at +12 volts 
may be used, but only with large 
capacitors to provide a source of the 
excess +12 volt current during motor 
power-up periods. The worst case 
occurs if the +5 volt supply is derived 
from the +12 volt supply, which many 
are, since the power-on transients 
may then also affect the +5 volt logic 
on the board. 

Adding fuses, appropriately rated 
MOVs, and reverse diodes on the DC 
supply lines would be an inexpensive 
manner in which to try to protect the 
disk drives from power surges and 
power supply failures. Adding an MOV 
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The Original FLEX™ for Color Computers 



• Upgrade to 64K 

■ RS to FLEX, FLEX to RS file transfer ability 

• Create your own character set 

• Automate recognition of single or double density and single o» 
doubled sided 

• All features available tor either single or multiple drive systems 

• Satiable Disk Drive Seek Rates 

■ Fasier High Resolution Video Display with 5 different formats 

• Save RS Basic from RAM to Disk 

• Move RS Basic to RAM 

■ Load and save function on FLEX disk 

■ 24 Support Commands 12 with Source Text 

■ External Terminal Program 

Languages Available 
Pascal, Fortran, RS Basic, RS Assembler, TSC Basic, TSC Assemb- 
ler, Relocating Assembler, Macro Assembler, Mumps 

H you are hied Ol playirKJ games on your TRS-80C Color Compute" or find thai you are 
nancrtactieo by tie limitations Ol the US BASIC in Iryina Ic wntea P'ogram that w.H alio* vol, lo 
actually USE in* Cc-ck Computer as a COMPUTE R VOU ARE RE AOV TO WOVE UP TO THE 
FLEX9 Operating. System. II ¥ ou *a^l lo ha*e RE At PROGRAMMING POWER usiiq a" 
Einemeiy Poweiiui Business BASIC PASCALS C Compilers a Mi-hio*i Macro Assemrjie* 
with A Library capability so voli are nol continuously remuenlinq Ihe *h^el YOU ARE READY 
TO MOVE UP TO THE FLEX* Operat ng System if you AGuM l*« 10 see it YOU Or A. 1 V 
COULD USE A COMPUTER tN YOUR 8US»IMESS C" 0«Cpn 10 maWl yOU> Cr ; '■■■•• 
PAYING rT S OWN WAY rjy Ooinq some Computer Worn <0< I'fUf millions Ol Sina* DUS'ne^ss:- 
arQuntf yOU SJCf 95 WorrJorOCeSSirtg PavuS" ALCfXNmQ Inventory &1(. men YOU ARE 
READY TO MOVE UP TO THE FLEXS : Operating System Mo*' , -'DATA-COMP"asine*aw' 

DATA-C0MP^FLEX9 GonwrSrtW loi Hie TRS-80C Coar Computer was desiqnen I 
SERIOUS COMPUTER USER: mlH features ins great <, ncrMWJ Dr=.rii.iy Screens lAwTH 
Lower Case Letters 40 yt>j can pul a FULL Menu 00 OUC Screen n. *.ep SEVERA' 
oraofs ai IFie same tune *itn features ime p'ovMjiig a FULL KevOoa'O so you have FULL 
Control ot you' Computer AND •! 5 Prgqiams NATURALLY without nperjirxj a Chart (OSVC Wtial 
Kev Ccntwialicn will give you what lunelion with USER ORIENTED functions to maite usinq 
rhe Operating System natural like having tro Compute' •AUTOMATICALLY tfeteimme what 
type of Dish 15 being used in what typeol Dis« Drive ana wormnq accorgmqiy. rati"*' tnai you 
nave to specify eacri and ewe'y (rung <or it Or I we nav.ng rue CorTtputer yvorK iyith (he Pi.nler you 
have aean using all along without you having ro tell the net* Operating System what is mere erf 

"FLEX »s a trademark of Technical Systems Consultants 



DATA COW P has everything you need to make your TRS-80C Color Computer WORK 
lor rOU; from Parts and Pieces to Full, Ready To Use SYSTEMS. DATA-COMP oengns. 
sells, services and SUPPORTS Computer SYSTEMS not just Software. CALL OATfl- 
COMP TODAY to make your Computer WORK FOR YOU' 

System Requirements 

FLEX9 Special General Version « Editor 8 Assemble' (when normally sell lor SSO 00 

ea.f Si 50 00 

F-MATE(RS) FLEX9 Conversion Rout lor the RS DisK Controller 

when purchased with Special General FLEK9 Sys $49 95 

when purchased wrtrnjur the General FiEX9 Sys. SS9 96 

Set ol Elohl 64K RAM Chips w Mod instructions $59 95 



Color Comouttr with 64K RAM and EXT BASIC 



SPECIAL SYSTEM PACKAGES 



£3Mq q> 



64K Radio Shack COLOR COMPUTER. Radio Shack COLOR DISK CONTROLLER, a Disk 
Drive System. Special General Version ol FLEX9 . FMATE(RS) and a Box of 10 
Double Density Diskettes, a COMPLETE, ready to run SYSTEM on your Color TV Set 

SI 079.95 

DISK DRIVE PACKAGES, etc 

These Packages include <re. Radio Snac* Disk Controller Disk Drives *'th Power Supply ana 
Cabinet and Disk Drive Cable 



PAK *i 1 Smqie S.aed DouCie Density Sr& 

PAK *2 ;? Smgle S'ded Double Density Sv*» 

PAK *3 1 .1 r •• :■•. :■■•: Lnjurji- L!u-r,ry iy."= 

PAK »4 2 DouCHe SKied Douoie Density Sys 

pak *5 2 Qvime Thinune Double Sided DouDie Denary Sys 

, . tl ,,„,,,, PARTS AND PIECES 

Rndin Shacn O'Si Cant'o^er 

1 Smc^e Sided Oaubie Density Disk Drive Tanaon 

1 Double Siaed Double Density O'Sk Drive Qume 

1 0-ume Thinfcne Double Sided Double Densily 

Screen Clean Oeais Up Video Distortion On Youi Color Computet 

Single Drive Ca&mei wirn Power Supply 

r.:.:n.:ii- : :t.i' 1 1:. " I w [I P wer Supp v 

S' , Ql' v Ll'ivt J -.. Cable ' r H5i Cc^rol p' 

Double 0'ive Dis« Cable tor RS Controller 

Micro Tecti Prods Inc LOWER CASE ROM ArJauref 

Riida Shack BASIC Version l l ROM 

Rata Shack FuMnOBd Batwi- ROM 



S4S996 

Sr-49 95 

S569 95 
S919 95 

S 749 95 

S179 9S 
K49 95 
S349 95 
S27& 95 

Vv- M-, 

589 95 

5?4 95 
53-i 95 
$•4 95 
5J4 95 



TERM — AN External Terminal Driver is FREE with purchase of F-Mate 






For Ordering Call TOLL FREE 1 -800338-6800 



LAST OF PRODUCTION!!! 
!! LIMITED QUANTITY !! 



SWTPC 821 2 Sl 821 2(W) 
Intelligent Terminals 

Data-Comp Has Bought the 

Remaining Supply of 
SWTPC 8212 CRT Terminals 



If You Need an 8212 

We Have Them 

in Stock! 




PRINTERS 

"The Epson MX-S0 
$425.00 

The Epson MX-MO 
$725.00 

MX-70 S355.00 MX-80 FT $575.00 

Ur 

Verbatim Diskettes, 



5 Sort 5«clo/ Chilli 

Single Side Single Densily 12 75 « 
Sinrji* Side Double Density $2 ?S •• 
Duotpie &ide Qoubl* D»ns.ity ia <17 i-a 

PUJinc r, ill aye 8oi J? GO bi 

A Sot Sector Di»kt 
Single S«tle Sin«» Density S3 ?5 ■• 
Single Sioc Double Denaity I* 10 ■• 
Double Side DUUBM De**Uy S« T5 •■ 
mm LiO'*ry Bni J4.O0 •■ 

Foreign Orders Add 10*. SwrfK* ?0" u «»r Man 



EM-82 Video 
Terminal 

Emulates the 8200 Serie? 'rom SWTPC 




DATA-COMP 

P.O. Bon 794 HIXSON, TN 37343 

• 61S-B42 4601 




Data-Comp— South East Media & 68 Micro Journal Are Divisions ol CPI 



For Ordering Call TOLL FREE 1 800-338-6800 
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Software 



FLEX 



For Ordering Call TOLL FREE 1 -800-338-6800 

Os-9™ Color Computer 



Per the Strictly Cote* Computer 'Llsnrs 
AVAILABLE NOWtM 
Hoyl Sterns Electronic*— 

rntrrauetl by Ft»*T? , ''He'»i«at : oithc*a3u^r*wed»new»y r ^ 

irs*iKrtioraloi'lr"ariBlefTnoi1lodi*rf>Ou*iah. Wflt»nc«riarH¥'nr''«*iine language, il*»pMM*unp«aleWfl Attar 
SnrrwjraphiC-8 E0tto» a provided, along with gcooles like Qtaphcs and Sound Commands. Printer CoifWid*, 
Auto Repeal and Control Kays elc. ir you are interested in Learning Forth, a Trace Feature is crowded wnir.h is 
■NafeMbta llyaua-rf d rOR^' ■ P. u iha |V>.-.kagn nrowees CPU W ■>• f aft] WHI IX ', . --KI I S5k Mil f pin* rvg C i.v 
Inlemipngrow' the Base eapatxWIes at toe Irrvtorrajrita&Ofll. Combine th* package with Jon Brcias EXCELLENT 
Book "Startng FORTH", and YOU w* lie a FORTH Expert before you know il land have a. to! ol lim doing il'l 

■M 

O-F 

Finally Ihe barrier h«s boon removed IfOm OS? " to FLEX ■ formatted rjski' Now you can READ and WRITE 10 a 

FLEX" diskette- 5 or B inch. w*i 0-F. 

0-F is a new and umquw program, written in BASICQ9 " that pnrtprns the following luftcwns, and comes complete 

win source 

t B£F0rMAT:Th<smMuwtanrria1sacr^lhalea^ EightarnvellWrtMieetablB 

3 FLEI8AS: This piugtarri does tie actual rood or virile funcsonto Vie special OF risk Also it has the dak torn** 

BM D1R IOSBI commands Al selectable Irgm a user-tfasndly menu AH selections are interactive and cormpleH 

incluooa all necessary (KOfliplB to the oownliir 

1 CUR: This modulo Imonu selected) allo<*8 the ask aracury lo be printed to Vie sown, twals in BASIC09 

FLEX users, can read. «wt|n and use the special d6* as any other FLEX de*. prowrjed Vie FLEX directory rs nor 

Stowed 10 COntltHUB beyond track lorO |too many hies) 

17999 

A COLOR COMPUTER TERMINAL DRIVER 

TERM V) a new and tone needed terminal driver tor mow color computer users who liavedevBloped slinging, rod and 
•aVBrmsR^hallil TERM allows you to switch Irom the CoCo keyboard and TV monwr to a real CAT vTOoowrnwial 
Thnk wnat mar means' No more 32 or even f»1 charades aer line, thai ate ao tNUrred flat you must guess M to whsl 
sonw characters actuafy are No more souinhng or cussno. Sounds greal* Well TERM gets you away Front art that. 
TERM is cated Iron Ihe CoCo as any other program You Wen type the HETjfiN key on the CAT whan wrmnai 
keyboard and TERM cenhgures thai CRT video tomunal to the proper baud rata and ynu are Irno of squinting and 
guessmglTo return Wrfir-L.nf, 1-. kp- f ocor3 iGodlotbn). youaimnly l>T>fl wine command EXTERM --oil Ihs CRT vi^efl 
lermnal keyboard, end you ore bock where you slated from squints and all 

Tl nw -_u croris Irrrr Lm'j Cur,, FLEX J «ll| srt.1 1 ... i ir ■ :. ■.-■ I, ,i r.l.indanj CR1 *»■! l'-' r i'" J 1 I '■<- BralraJI «' 
00 1 0' a deluxe lannmai erther works lust Itne The lennia" is ccnrwcirjd to Hie serial tjon or the CoCo by e siandard 
cable and comector. TERM does NOT functon in HadB Shack mode (muslM FL£X). 

It youwarfl the luxury al SOCharaclenjtW 2* lines, or "Xire. dopancanq *1 IrW CRT ndMKtmrnal used, the<i TERM'S a 
must' 

OMLV E19.95 
FREE with purchase d F-Hati 

SPELLB "Computer Dtcliorwry" 

No more Let your frnge>s do 1IW waaung nvrouan Itu Drtnnary ' while you are iripuOing tesl with your lawonla Ettlot 
or Word Processcr SPELLB, «rn1».i by Oan Famaworth of PALM BEACH SOFTWARE, « more tnar anoino' 
Spelirnj Cneckei n allows yewto '<ook uoo word Irom wiBiii> your E<litO' 0« Word Processor so that you KNOWitai 
nglil AtlEN VOU T*Pt IT m (it your Editor supports a method olpassnig a Command lo FLEX wthoul curling the 
Procjiamil rWfi ihe SPMCMO Utility Iwheti operates in Ihs FLEX UWr Space'/ Ve», it ALSO allovrayxiu lo check and 
updarrelheleilarteryouarslirrahcd 0Jongwilna**iyingy0u1ftAMJ1f'^0Stotw0KaiDnary Flag quwstiij'iatili! 
wo/da *» tfr» Te«t tor evaluation laler View a word ncontesfOelore changing crtgnarng ole SPELLB litsi cftecks a 
' Common Word CrKbonriry Iben Ihe normal Dttianary. (hen "Personal Word Lai and trnilry , any 'Special Wora 
Lisl' you may two soecr'ied SPELLB also alfcw<s the use eri Small Disk Storage Systems. 

ELtiamCvrifi tittes 

• JUST' T»»1 Formatter 

JUS» . * " Text FejrmaHor dovoloped by Hon AnderHon . provides numeinusiaaluree which maate ■ a vaajabla addiaon 

to any FLEX Usars Bonware Libnan/. JUST is designed Id to»mai«ng Teat Qulp.it lor DotMatnx Prmbarsand provides 

many unique leaiu'e?' 

Output Ihe "Formelto&r Text to Vie Olapiey tor aormal analyse; ana change 

Qtapul tl* "Fommttoa" T*k1 Id a lead File lor use w* the laJBW FP«WT.CMDWproduelrgn>ultip»»eop*aorih« 

Tead on Die Pointer iHCLUOING IMF3eOOED PFIINf £fi COMMANDS ONa LWHy «*Mul at olher times aaM, and 

worm the pnee of the program by rtsnHi 
"User conngumaa rbr adapting lo uiher Primers (comes sei up lor Epson MX-90 won Qralr ir j. provides to- up to 

tan (1 0| invbedded ' Pnnter Control Commands* such as Italics on and off Botdlaca on and off, ale 

Includes Ine rwniai aiva wirsai. margin maertf, paragraph, space, vonicaJ snip Mies, page leixiin, page r-jmowng, 

centanng, ha. lutaAtattofi, ate 
Use with AMY Ed'li» 

SuppUM with Slrucsured Source (Wmdrush PL<9|; easy la see the Hoar 0) the program, 

aLElaB*Ct<o»FLt« »«» 

PROGRAMMERS <twth NEW and OLD-TIMERS) NOTE — 

The Power amo ve»tsaiii«iy w irw 6809 cpu •«* snecnee ne capaontie* n> tne cm siarwaw proorarwmno 

Praciicea and PrticedurBs, and opened Ihe door tor the ' irmovaajrs of ■» indusiry to dtrvetop KV* and "BETTER 

Sotiwani Development Tools WIMOflLISWMWIIOaYSrTEalSh 
we rind a home on EVERT Phmvi tmers work oanch. 

MACE & XM ACE By G raham Trott 

MACE ■ a eofntHnod Edttor AssernWei aosionBO » anew Ihe Piogramrnrjr to Enter. Eott. and AaseiPtHe Programs 
vntn a nuntrrmm crl eftort. lauafiEiarJeaipnfldoraiieravlo'ti^EASViJeve^ small to medium sliad ABBentrry 

Language tjrograrm Qui laager programs can be developed usmg Che "Spool" caoabnaes The Edrlcr la Blmplrliecl 
Lino FrStLTrfilFframfcned tar Etits packjoej "codes eacti Op-Code, provaSrig mHiimal rruarriciry raquuwmnnls. MACE it 
very 'tbrgrvng '. which when comteBed w* Ihe ' inlerrKSnie'' Operation, makes tfiis an EXCEiLENT package tor ti* 
Gegmnno Programmer' 

le* eyj Co»k CLB - (H« 

PL'S By Graham Trot! 

PL 9 - an EcMor Compiler Debugger all combiryed w-rtrs ONE PACKAGE, wtach was devised jpocriicarly tej a*ow tie 
Assc^iL<yLariguil9*ProgiarnVTier|he Best Ol All Worlds" IUIIOwsriePrCrgrrinlmerI»use"SlriiaiaeaPtogiarr«Tarrfl 
Techniques wtwe working at toe Assemtjy Language level m a malty (NTEH ACTIVE Progaam Dewaopmerti Cycle 
QUat Mt» working with BASIC; voter some code, try i edit the code try i agaK etc.). The Single Pass Compter 
Supports UP to I2T Cnenjctef Symbols Vanabaj Types; Pcwle-S. Contjol SlnjCtures bull aiourld the -Procedure 
SyaWTklF THEN ELSE BEGIN END. WHILE, BEPEAT UNTIL smxtores W.. along wan SI**. A-, B- and 
D-Reojrtler manoutaaon etc. The Editor Assembler are smnaar to Vie MACE Program The Traoc-DeOugjger -s- 
UimiiVbiJ towards the PL'f Source Program and provides Snple Slopping. BrealcpoHiting running a tpecJIied Lai* 
humner Range, etc AJrial.lt-MpaoaFldavaneicellenl Software ["-^veiripmen* Tr^ tor i^ii^ingtri^ poorer tyrne6ex^ 

R.EX ml CokH FLEX I1M6O 

C — By Jamea McCaih 

Finally, tortho *BigFirTwOperalr7",arrorlhcbc^innerwtiocan , 'see'tieli^rnt" here 

a the EXCELLENT WTMOflUSH MCFtO SVSTEMB C Compiler The; Oj one Of THE C Compilers lor tne FLEX 

Ope>*Umi System. It Can be used v«ttr normal Assemblers lor most Programming, or wtfh the TSC ReteCe*ng 

AssemMef Unking Loader for those 'fu* btown" Sysiem Peckaora 

R.EX am cou-n.EX — S2SS no 




Irrtro) 

AVAILABLE NOW!!! 

•809 "C" Ccimpll«r.oene"a1w»idrer* , yer»ae^lr*tr^cc4e.Oirtpi^'W toMt-BSaOOOine Bit 

Cwraorms I S limes faster than a A MHi 3U0 erien using a 2MHe 6809 System fRe, p 43. '68' tAejp Journal. May 
■53). 

FUEX, Csk> FlEU, 069 «3t»nci 

■ l.iil-:. m:--.ii.' 

One vmm MiFMrance 3IDOD0 



Lucldatv 

AVAILABLE NOW'!! 
PASCAL Language and P-Code Compiler. Version J Designed especially tor Micro Computer Systems: Run-lime 
System checks available resources tor each last, allowing operanor on even naranai computer systems Based an 
tho proposed ISO StarWanJ Allows lirAape lo AssernWeY Code "kx maKmmm fiesibility 

FIFXiinrjCuo' FLEXS- liSDOO 
II FS 11 S20S06 

PASCAL UTILITIES — Raojuee LUCIDATA Pascal Ver 3. XREF — w* produce a Cross Reference Listing el any 
Hat auruK) speodicny towards Pascal Source INCLUDE — aicnrs the aiclusmn ol offim Files in a Source Tekt. has 
unkmrted neslirg Htoatxlrlies. Also allows Btnaxy fiie-nciu«icns PROflLEH — produces an Indented Nurnbered 
vanjclDBram o(a Pascal Source Te*l File AA>wsviei*anglheoverpls*ueli*ertlari^efogB 
art to me intogrny d tne piogram Suppled n Source Code regures cornoilalico 

RFlaW caar « FU — E au i umuu rn tan 

COPYCAT— Alowi readina TSC Mini-Fl FX SSB 0036ft andDigrial ReaatarchCP M Disks while ooe'eling undei 
FLEX 1.0. FLEX 2.0 or FLEX9 0wimsW0or fS9D9 Sysuirns COP YCAT will not pertorm hAraces but, between the 
progiarn and Ihe manual, you stand a good chance of acccmplishng a Iranslc-* Includes Ufililies 10 Lisl Directories. 
Copy Fllae and convgrt Teal Files whon teqiarod. Also mckjoes a Ublily for viiresagaand Physical Cornpallbwly 
prrXXems Prog/am; suppled in Modular Source Code w make it easier K> scve unusual problems 

HuTJ(mlC«iE'* , ur« V SWOw 

FiEk a sesoo 

WestcrHiater Applied Business Systems 

AVAILABLE NOWM1 
XOHS Data Managemenl System Pmsbh- one ol ihe moat powerful QMS a available This machim language 
uUHjan i a smitfl enouglVI to O0e*ale on a Single tided 5" r>Sk. yet provides Ihn spend Of M «. and power limMd only by 
Ihe urjci i iniagiriattian. 5upocrs Sequenaal. Hiererchical and flancejm Access File Slrudjrns and has ViriunJ 

Memory capabltt«s tor IhOSS Giant Cm* BaxiS Easyto-use Engksfi Language Command Structure 

Hex arvt Ctta FUEk 1I7»K 

CHESS tSBOS 

Reouires FLEX" and New Runs On Any Type Termtnal 
Faarkires 

• Twp caspu./ boarohv 
■ Four levels ol pay 

- Potm sconng system 

• Play wtineorpiaox. 

• Change c set up boards p«k>» posruons. 

• Fortetl move 

• Swap sktos 

• Make move and swap sdes 

• Change skill knrel. 

• Stop Mate in t -2-3-A' moves 

$79 9". Specriy 5' or 6 ' drsk 
This at One C/ the Strongest CHESS programs running on any im3o00rn|Xile« esiimaled UH» Hawig 1600 - 

OIET-TRAC Forecaster 

A Diel Plannng and Anatn'sis Program 
DIET. TRAC Forecasiei rs a program that plans a raal in Iwms ol either calories and oercenCage of carfjotrrdrates 
protmns and lets (CPSMf grams crl Carcohyd'aie. Proowi and; Fan tood exchanges ol eacn ol ihe sia basic lead 
grouos fveijetaole bread, meal, skm mix. mjfi and 'all tor a specrlic irdividual 

Saa. Age Height Present Weight Frgme Si?a ActwP^ Lo** arid Basal Melabohc tale lor wma* rHaviduiaii are 
laien into account lr*ar! weir^t and SLis«ainiTg caarmers ta Whena 

weioril pool is given {ether gain or loss) and a catone plan rs agreed upon between the computer and Bie invrdidual 
the number ol days to roach the weighl goal iscroieaed Trie sianutg gno enaing rem p« wwigtri loss i5«ucueio3 . and 
a daily calendar with each day's weannt for a 30-day pencd is pnntod 

sirs vf A&on — 1st as 
unrtEs vf AsaMt — sea as 

Fwmemtwr c»et»m« rinniillanta 

AVAILABLE NOW!! 
The PeweHiit Super SteU* »u«ml* rt» w DaAa-Coirai, Hogg, and Speoral CotO« Comu. FLEX Srsterra 

CetM FLEX OSWCI Ce*J arty l»l> 

Cckx i .1 >' - Saves Co* S99 00 

Worm* FlEI m SOvrca C4d» $09 BO 

UHFLEX ■ SmwMCde* POOdS 

Os-aa sauce corai n»i m 



— ail Cnwe Sy» Cam fnierv* in v- aw C<*> FuEa & f a*™" 



Great Plains Computer Co. 

AVAILABLE N0W1II 

STYLOGRAPH ZJtNa the Oata-Corrtp and HoggCotor FLEX Syslams Fua screen display and editirq |ie. what you 
see IS what you 0*1). Supports proportional pnnters. Operates with toe SI x 24 screens. 

SPECIAL CCluh ill* :;t>io Sisrjrxi 

futxstvlo sjssoij 

UNffLEk S»VLO S3K00 

FaMSPELLthM CNECKEfi: a>owsOrec1)Vcr>angrig Ihe Ted F4e. adding words B the dictionary, Mc TS.OOO words. 
#i less then 400 sectors (sassy Ms 5>v disks with other normal eonwtiands on il alsoi 

iiasua 

X V If 



FLEX- Cow FLEX. OS-S 

Uataux 



MAIL MERGE greatr,' extends the power and hentnily gl STYIOGHAPH AAows. Muthple Texl HeS to be prmted 
rJtataattiTaaBtgeillttriiHitrti'il.PrO^ndesto rnergjng irfbrmahon irao the Tail Fiat dia'irajpnnting (such as deleienr names 
and addresses), etc 

Mt.ftkrAn.IKt tiasoo 

UNIFUEk 1ISSDO 

INFOMAQ Data Baa* Management System — An XBASC-Based. Menu Driven. DBMS wan BtnU-ln Audi! 
Tracking, Evlremely Powerlul Repot 4 Format Capatxates. etc The Time Proven ' DBMS will become Ihe vVork 
Horse ' of yotit Software Stabte 

RUB! am c«tr flex istsee 

uMiFtex saasen 

Abe in Stock. Aeets Bee., Aeets Payable t Can Ledger — A Ful btown Accourrang Package thai can be used 
rngea>» or as sepaiaae packages, provides Ihe IRS required Audit Traoong <XS*SlC. Hsed on the 'Osborne 
Busneas Programs | 

Fifa are Color Cutx szts CO pbdo 
MHIHFX SJH4C"n0o 
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QUALITY SOFTWARE NEEDED 
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usiness Software for the 64K 
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V.o^ 
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COLOR COMPUTER %uZfr 




Data Base Manager 



Pan L 
Part II 



Single Entry General Ledger 
Church Contribution System 
Balanced Billing System 



S99.00 
$99.00 
S95.0O 
$99 00 
$9900 



iiniversalVI 

QATA V 

f V RESEARCH 



Integrated 
Business Software* 

Accounts Payable 

Accounts Receivable 

General Ledger 

Inventory 2 

Payroll 



F 

$295.00 
$295.00 
$295.00 
5295.00 
$295.00 



Depend On South East Media Make Your 'BACK-UP' On South East Media FREE DISKETTE With Each $50 Purchase 

-F, FU * a .a,*™,, nt Taa^r . * to- r . SOUTH EAST MEDIA 

^£?Z2S£23ES2L ^ 0mmmm For Ordering Call TOLL FREE 1 -800-338-6800 ssoo Cassandra Smith Rd., Hixson, TN 37343 

OS9 is ■ VMtaniarti ol Macroware » ^ g) ^.^a 
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and bathtub filter capacitor across 
the 115 volt AC line would further 
protect the power supply and drives 
from power surges and power line 
induced interference. 

Insufficient regulation will probably 
cause nothing more than a larger than 
expected number of read and write 
retry operations, unless it is 
serious. The timing marks on the disk 
drive flywheel provide a quick means of 
checking for motor speed variations. 
Under a tlourescent lamp, the marks 
should appear almost stationary; if 
they do not, the cause should be 
immediately determined and corrected. 

Main power spikes may be transmitted 
through inexpensive power supplies 
and destroy data on the track over 
which the head is placed* Placing 5 
volt MOV f s across the +5 volt 
regulated supplies may prevent some 
problems; however, the best solution 
is to remove the diskettes before 
tutning power on or off. However, 
power outages may cause several 
problems due to the fact that the 
power switch for the drives may still 
be turned on when the power returns, 
and the power line will be very noisy 
when it is abruptly turned off: and 
again when it is turned on. 

DISKETTES 

The Radio Shack supplied diskettes 
are adequate, though quite 
overpriced, for their use on the COCO. 
In the many hundreds of 8" and 5.25" 
diskettes I have sent to customers in 
recent years, problems have been 

almost urtrelaLcHl Lu brand. I now uao 

the least expensive, diskettes 
available (currently $1*29 eacfi plus 
$0.12 per cover in hundreds 
quantities) and have fewer problems 
with them than with the premium 
diskettes previously used. The double 
track 5.25" drives supported by COCO 
FLEX may well require the higher 
quality diskettes, although this is 
probably more dependent upon the 
quality of the drives than upon the 
quality of the diskettes. 

DISK CONTROLLER 

The Radio Shack disk controller 
follows the Radio Shack tradition of 
using an almost minimal design. The 
board uses a western Digital 1793 Disk 
Formatter, which Is very commonly used 
and supports double density 
operations, a WD 1691 Data Separator, 
which interfaces directly to the 1793, 
a WD 2143 Four Phase Clock Generator, 
which Interfaces directly to the 1691, 
and a 74LS629 VCO. This portion of 
the interface board Is taken 
essentially verbatim from the Western 
Digital 179X Applications manual on 
page 14, 

The primary additions to this Western 
Digital circuit Include pulse shaping 
of read and write signals, with the 
write pulse set at 450 nsec and read 
pulse set at 200 nsec, and the 
buffering of the output lines with 
open collector gates. The primary 
modification to this circuit concerns 
the fact that the TC43 (track greater 
than 43) output from the 1793 is not 
connected to the 1691; instead, the 
TG43 input to the 1691 Is connected to 
a latch controlled by the software. 
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The Radio Shack software sets this 
input high when a drive Is accessing a 
track number greater than 21 and low 
otherwise. This has no direct effect 
on read operations, but causes write 
p re-compensation during disk write 
operations. The usage of write pre- 
comp in this manner is unusual. Most 
40 track 5.25" disk drives do not 
specify pre-comp at all in their 
design manuals. The supposition is 
that write pre-comp was added to 
attempt to alleviate some of the 
problems with reading causes by 
deficiencies in the disk controller 
board, as discussed below. 

The disk controller board provides an 
8K byte ROM which contains the disk 
drivers used by the Basic interpreter 
and logic supporting optional 6809E 
non maskable interrupt at the end of 
1793 commands plus 69091 halt during 
double-density data transfers to and 
from the 1793, along with drive 
selection, motor control, density 
control, and write pre-compensation 
control. 

The halt logic is necessary to enable 
the 6809E to transfer data fast 
enough to or from the 1793 while in 
double density mode. When activated, 
it halts the 6809E whenever a 
reference is made to the 1793 data 
register, until the 1793 provides a 
DRQ (data request) output. The NMI 
logic is necessary to force the 6809E 
out of a (potentially) halted mode 
when the 1793 completes or aborts an 
operation, activating its intrq 
(interrupt request) output. Thus, a 
very tight loop may be established to 

ttsnufat U«fcai fcta rtt £**m kh» 17011 »1»fca 

register without checking the 1793 
status register or the number of 
bytes transferred. 

The disk controller board has the 
following memory map to the COCO: 

C000-DFFF 8K ROM containing 

disk drivers, etc. 
FF40 control register: 

bit usage 

7 nmi 

6 drive 3 select 

5 double density 

4 pre-comp 

3 motor 

2 drive 2 select 

1 drive 1 select 

drive select 

FF48 1793 command register 

FF49 1793 track register 

FF4A 1793 sector register 

FF4B 1793 data register 

The Radio Shack disk controller board 
does not provide any of the following 
hardware services provided by many 
other disk controllers: 

motor-on delay timer 
off-speed detector 
motor status sensor 
drive-ready status sensor 
motor-off delay timer 
head-load delay timer 
head-load status sensor 
additional filtering of raw read 

The mo tor -on delay timer provides a 
fixed delay, usually by holding the 
1793 ready line inactive, to allow time 
for the disk drive motor to start and 
to stabilize at the correct speed, 
before allowing the 1793 to attempt to 



read from or write to the disk drive. 
The Radio Shack software provides a 
one second delay to allow the drive 
time to start and stabilize, if this 
delay is not performed, the 1793 will 
attempt operations on a disk drive 
that is not ready to respond correctly 
and may abort an operation simply 
because the drive is not turning at 
the correct speed, causing 
unnecessary retry operations. 

The off-speed detector and motor 
status sensor are often provided in 
addition to or In place of the motor- 
on delay timer. *n off-speed detector 
is usually implemented as a missing 
pulse detector which holds the 1793 
ready line inactive if the index sensor 
on the selected drive is not providing 
pulses at a rate very close to the 
proper interval. The motor status 
sensor allows the software to 
determine the current status of the 
motor-on line on the controller board, 
thus simplifying the housekeeping work 
of the disk driver software. 

The drive-ready sensor may be used 
only with a drive which implements the 
logic required to determine that it is 
turning at the proper speed, has a 
diskette installed, and is ready to 
receive or transmit data. It could 
thus replace the off-speed detector 
and motor status sensor in some 
cases. 

The motor-off delay timer 
automatically turns the drive motors 
off at a fixed amount of time after the 
last access. Because of the lack of 
this timer on the Radio Shack disk 
'■ii^'..noi ( fchp .irivD motora are often 
accidentally left running when they 
could be powered off. This usually 
happens when a disk access is not 
followed by a keyboard" input 
operation, since the Radio Shack 
keyboard input routine must implement 
a software timer to decide when to 
turn the motors off. 

The head-load delay timer and head- 
load status sensor provide better 
control over the status of the head- 
load solenoid. Unfortunately for the 
Radio Shack disk controller board, the 
Radio Shack supplied disk drives have 
no head-load solenoid and thus have no 
need for a head-load delay timer or 
head-load status sensor. Their 
inclusion on the board would have 
simplified the software supporting the 
drives with head-load solenoids. The 
Radio Shack software also assumes no 
head-load delay required, thus causing 
potential problems for drives which do 
not load the heads until selected. 
Drives with head-load solenoids which 
are to be used with the Radio Shack 
software should be strapped so that 
the heads are loaded whenever the 
motor is on. 

The only digital filtering provided for 
raw read signals is the 200 nsec. 
pulse shaping provided by 74LS221 
single-shot U7. The 1793 data sheet 
specifies that this pulse may be as 
short as 200 nsec, or as long as 600 
nsec. This filter may be materially 
improved by increasing the pulse width 
substantially; Increasing C21 to 200- 
250 pfd, would have the desired 
effect. If the change is made, it 
should be done on a trial basis and in 
a manner in which it may be easily 
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removed; depending upon the drives, 
extra filtering may not improve actual 
trie overall read performance. The 
purpose of. digital filtering here is to 
reduce noise on the raw read line by 
forcing the filtered output to remain 
in the active state, once activated, 
for a minimum amount of time 
represented by the pulse width, thus 
stabilising the filtered read data. 

Still another source of problems with 
the disk controller board concerns 
some of the components themselves. 
Several of the components, especially 
those in the VCO circuit associated 
with the 74LS629, should be of very 
high quality, since the stability of 
their values is critical to the proper 
functioning of the raw read data 
separation logic. However, they are 
of standard quality, causing excess 
drifting of their values associated 
with temperature and age, and 
necessitating frequent adjustment to 
maintain standards of voltage and 
frequency in the VCO and write pre- 
compensation circuits. 

The interface board has three 
potentiometers for adjustment of the 
VCO and write pre-compensation 
circuits. These should be 14-turn 
precision units, but instead are 3/4- 
turn inexpensive units, making precise 



alignment difficult to achieve and to 
maintain. Even dropping the disk 
controller board may upset the 
delicate adjustments. R8 and R15 
must be adjusted while the disk 
controller is in the idle state. R8 is 
adjusted so that a 1.4 volt level may 
be measured on pin 2 of Ull. Then R15 
is adjusted so that a 2.02 MHz signal 
may be measured on pin 16 of U12. R!6 
must be adjusted while the 1793 is 
executing a continuous write command. 
It Is adjusted so that 200 nsec. 
pulses are detected on pin 4 of UT2. 
Unfortunately, R16 cannot be adjusted 
without using a ROM port extender 
card or without removing the COCO 
case. Note that adjustment of these 
potentiometers requires a high- 
impedence voltmeter (R8) r a frequency 
counter or oscilloscope (R15), and an 
oscilloscope (R16). 

SOFTWARE 

The Radio Shack supplied software (in 
terms of the ROM based BASICS) 
supports the Radio Shack supplied 
controller and drives on a minimal 
basis. Ideally, a complete ROM based 
disk operating system would be 
provided, including a logical interface 
which would shield the user from the 
details of the hardware and disk 
format. This system would include 



logical file open and close, sequential 
and random read and write on the byte 
and sector levels, and catalog utility 
operations such as rename and delete* 

What Radio Shack actually provides 
(and documents) for non-BASIC 
programmers is a low-level subroutine 
which is capable of "read or write 
specified drive, track, and sector" 
and "restore specified drive to track 
zero" operations only. It is 
contained in the Extended Disk BASIC 
ROM. 

This routine, called DSKCON, is 
capable only of double (not single) 
density, 35 (not 40 or 80) track, 
single (not double) sided operations, 
with head step rate fixed at 30 (not 
6, 12, or 20) milliseconds. It has no 
provision for specification for 
automatic write verification, which 
should properly always be performed to 
prevent lost data and files. None of 
these parameters are modifiable 
without moving the entire routine to 
RAM and/or rewriting it. DSKCON was 
obviously designed for the ROM based 
Extended Disk BASIC and implements an 
almost minimal interface to the disk 
controller board. 

The entry point of DSKCON is pointed 
to by the contents of addresses $C004 



JUST GOOD SOFTWARE 



DISK DOUBLE ENTRY - if you have spent hours 
trying to balance your Debits and Credits. Ibis program Is 
lor you 1 Designed for small business, club, and personal 
use Enter transactions m a journal type format. Program 
will maintain currant account balancer produce Trial Bal- 
ance. Income, and Balance Sheel r«po*ls and complete 
Accou nt Ledger* Will ha nd le up to 30O accounts including 
report headings and totals. Up lo 1 400 average transactions 
on a diskette Summary reports and four levels of subtotals 
available. REQUIRES 32 K and a user understanding of 
standard double entry accounting concepts. ■ S44 .95 In 
BASIC with Machine Language subroutines. 

DISK DATA HANDLER - «4K - Designed to use 

i he fgii 64 k R am. but may also be configured lo* 32K uses 
standard ROM's ■ No special operating system required' 
Allows you to design disk data files lor your specific needs. 
You define a basic record of no to 14 fields and 246 
characters Provides fast selection and sorting based on 
any field or combi nation of fields i n th is record. Powerfu I on 
screen input and update User defined output of reports to 
screen, printer, or disk files which may be read by your 
BASIC programs for any computational or special foimat- 
ling requirements Primer reports allow headings, oage 
breaks, and page numbering, and let you pass control 
codes to drive your printer's special features Maximum 
number of records you may work with at one time will 
depend on RAM configuration and record »iie - 64K ]32K) 
185015001-21 char records. 179(49) -246 char record* 
An opt Ional Extended record ii nked to the basic record may 
also be defined. The sue of this Extended record is not a 
factor in determining maximum number of records. Will 
provide the growth capability needed for your increasingly 
sophisticated applications. S54 95 in BASIC with Machine 
Language subroutines 

DATC-O-B ASE CALENDAR - Puts you in charge 
of your schedule' Graphically displays any month ly calendar 
between 1700 and 2099. You put m up to twelve 28 
character memos per day - calendar shows where the 
memos are 'cafl up of day shows details. Use for appoint' 
ments and a logo' past activity Study I he chronology of the 
American Revolution or note the day your mortgage will be 
paid oil Search capability allows you lo Nsl or print all 
memos betwee n two specified dates or only ones meeti ng 
key word criteria. Date computation shows elapsed time 
between two dates in days, weeks, months, and years, 
REQUIRES 32 «. ,r BASIC 

TAl»* MTB-O-fMSfX CALENDAR - SI 8 95 - (max 400 
memos/tape file) 

DISK DATE-O-aASff CALENDAR -S 19 95 - (over 4.000 
memos/disk - max 300 memos/monthj. 



We want your 
SUGGESTIONS! 



Th at 1 s I NTE R E ST-I fig - Time to let your computer 
do some real computation' This program will help you solve 

problems dealing with time, money, and INTEREST Calcu- 
lates present value, future value, end capita' recovery for 
any combination of payment* you specify Rale Of Return 
comttuiation to predict how hard your manty will In working 
Special section lo compute bond yields (current and to 
redemption i Amortization schedules about any way you 
want them - even allows you to change terms in mid 
schedu le 1 Alt answers ava ilabie on screen or printer. $29 95 
in BASIC. 

MATH TUTOR * Five programs thai go from math fact 
l+, — . X. /) drill to full addition, subtraction, multiplication, 
and division at four levels of difficulty Provides a step by 
step approach with error correction and rewards tor good 

performance - St 3 95 in BASIC 

SPELLING TEACHER- up to 2O0 oi their spelling 
words stored on tape or disk are presented in four lively 
study modes mcl uding a scram bled word game - 1 1 2 95 m 
BASIC 

ALPHA-DRAW ■ A subroutine designed to let you 
easily ado characters to your graphic displays, you define x 
and ¥ coordinates and a string variable of one or more 
characters and Alpha-Draw will do the rest. Includes all 
keyboard characters. Comes with instructions lor a true 
line numbered merge of tape files, Works great with the 
Screen Print program! • S8.95 in BASIC 

GRAPHIC SCREEN PRINT PROGRAM - 

Works, in ALL PMGDES and lets you shift scieen image 
anywhere on the printed page Relocatable code lets you 
useallofyour 1fiKor32K machine Available lot both Color 
Basic 1-0 and 1-1 Use EX EC 41 17 5 to see which you have 
and SPECIFY with order, in Machine Language. 

SPECIFY PRINTER TYPE 
*?.*» - For TRS-80" LP-VII/VIII 1 DMP 100/200/400 
»t.»» • For Epson GRAFTRAX", PRQWRITER', NEC PC 
B023A-C. Mieroline" 82A/B3A (with OKIGRAPH' IK Microfcne 
84. IDS-44G7445. Paper Tiger' 460/560, Micro Prism' 480. 
Prism' 80/132 (with dot plotting], Micro Peripherals Inc, 
B8G/99G. Centronics 739. Star Micronics, Inc. GEMINI- 
10/15 TRS-80* DMP 120 

(Trademarks of Tandy Corp.. Epson America. Inc.. C-ltoh. 
NEC America Okidata Corp., Integral Data Systems. Inc.) 



ALL PROGRAMS require Extended Color Basic and are 
delivered on cassette All, except Tape Dale-DBase Calen- 
dar, are DISK System compatible ' 



Custom Software Engineering, Inc. 



807 Minutemen Causeway (D-3), Cocoa Beach, Florida 32931 

(305)783-1083 




For VISA and Master Card orders 

Include type, account number, eipiration 
date signature and phone number 

Sorry' No COOS 



US a«*d CANADA add SI 00 per order lor snipping 
Overt*** S2.5G per o>der AH-prce* *i US dollar* 
Fiona* r«K3tn« aao 9"*» sales tax Return wiihm two 
w#eh» il not completely aa1ii<i*4 



RAINBOW 

Cf*T«TlCATIO* 
St* I 

ALL LISTED 
PROGRAMS 
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and $0005. Its parameter list is 
pointed to by the contents of 
addresses $C006 and $C007, the 
reverse of the the normal parameter 
passing logic in which the address of 
a parameter list is passed in a 
register to a routine. This 
parameter list is composed of the 
following parameters: 

Operation Code 1 byte 

$00 ■ restore to track 
$02 ■ read sector 
$03 = write sector w/o verify 
Drive Number 1 byte 

$00 to $03 
Track Number 1 byte 

$00 to $34 
Sector Number 1 byte 

$01 to $12 
Buffer Pointer 2 bytes 

address of a 256 byte buffer 
for read/write data 
Status Response (on=error) 1 byte 
bit meaning 

7 drive not ready 

6 write protected 

S write fault 

4 seek error/ 

sector not round 
3 CRC error 

2 lost data 

1 busy 

DSKCON does not permanently modify any 
registers except for the condition 
code register. Any outputs of DSKCON 
are placed into the status response 
parameter and read buffer. The 
parameter and variable addresses are 
pointed to in ROM and hence constant, 
at least for a given ROM version. The 
parameter list is at addreses $00EA 
thru $00F0. The nmi logic causes a 
branch to $0109 when the NMI input to 
the 6809E is activated, in which is 
usually placed a branch to a 
subroutine in DSKCON to complete the 
operation. DSKCON also uses 
locations at S008A and from $097E to 
$0986 for temporary storage. The 
assembler language programmer must 
ensure that the contents of these 
locations are always maintained or 
preserved between calls to DSKCON. 

Given the limitations of DSKCON, many 
assembler language programmers choose 
to write their own disk drivers. For 
instance, every known version of FLEX 
for the COCO contains its own disk 
drivers. They usually support single 
and double density, single and double 
sided, 35 to 80 track, 6 to 30 msec, 
step rate, head load delay timer, 
write verify, and other features which 
are not implemented well by DSKCON and 
the Radio Shack disk controller 
board. Unfortunately, they have 
followed different standards for 
density and side selection and are 
generally compatible only in single 
sided, single density, 35 or 40 track 
mode. Also, unfortunately for non- 
FLEX COCO users, the formats of the 
FLEX catalog and data sectors are 
quite different from the formats used 
by COCO Extended Disk BASIC, so 
conversion requires special programs, 
and the disk and catalog routines are 
not transf err able, 

CONCLUSIONS 

The Radio Shack TRS-80 Color Computer 
offers users an inexpensive means of 
owing a computer with great 
potential. Even though Radio Shack 
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has taken a minimal approach on much 
of the hardware and software, the 
user will be able to avoid many of the 
problems and thus to use the system 
productively by following some of the 
suggestions discussed in this article. 
In particular, the following points 
should be emphasized: 

keep the disk controller adjusted; 

if using disk drives with head load 
solenoids, set drive option to 
load head when motor is ony 

try increasing the raw read pulse 
duration to 400-550 nsec.; 

replace VCO and precomp components 
with precision units (R8 r R9, RU, 
R13, R15, R16, C14, C17); 

when using DSKCON, always read back 
sector just written and retry 
write operation if necessary; 

consider using a "real" operating 
system, such as FLEX, rather than 
the resident COCO BASIC DOS. 

With these suggestions, the Color 
Computer should become much more 
reliable in the use of its disk drives. 
Maybe if enough people make these 
changes, their computers will be able 
to read the diskettes I send them and 
I can stay off the telephone. 

E. M. (Bud) Pass, Ph.D. 
Computer Systems Consultants, toe. 



INSIDE 

the 

DRAGON 32 



Just what is this Dragon 32 that 
you see on the upper left hand corner 
of the cover of Rainbow Magazine? The 
Dragon 32 is England's answer to the 
Color Computer. (And a most 
impressive answer it isl) To start 
with, the first thing you notice when 
you first see it, is that it has an 
improved keyboard. Upon closer 
inspection, it is similar to the 
original Model I keyboard manufactured 
by Hi-Tek. It is a standard 53 key 
Qwerty keyboard with a very nice 
smooth feel to it. Upon powering up, 
you get the following logo: 

(C) 1982 DRAGON DATA LTD, 
16K BASIC INTERPRETER 1.0, 
(C) 1982 by MICROSOFT 

As you can guess, it is the same 
Microsoft who wrote the Basic for the 
Color Computer. To my surprise when 
comparing the Quick Reference Card of 
the Dragon 32 to that of the Coco, 
they have the exact error codes and 
statements except for DLOAD. The 
reason DLOAD is missing is that the 
Dragon 32 has no serial port. Instead 
it has a parallel port. One 
interesting command I noticed on the 
Dragon Quick Reference Card is the 
presence of a PRINT#-2 command 
instead of the usual LPRlhfT commands 
associated with parallel ports. This 
eliminates changing all the PRlNT#-2 
commands of a Color Computer program 
to LPRINT commands. Even though the 
commands are the same, the actual 
BASIC is different from the Color 
Computer. This is because TANDY has 



exclusive rights to their version of 
Microsoft Basic for the Color 
Computer. While not all Coco Basic 
programs will run as is on the Dragon 
3 2, I tried several RS Rompaks and 
they all worked correctly. I even 
tried a long machine language program 
(Donkey King) and had no problems. 
Included with my Dragon 32 was a 
pamphlet of programs for it. This 
list has programs from Spectral 
Associates and Mark Data that have 
been previously sold for the Coco. 
This leads to the assumption that even 
though Coco programs may not run "as 
is" on the Dragon, they can be 
converted to do so. 

The Dragon 32 is aptly named as it 
comes stock with 32K of RAM. Unlike 
the 32K Coco from RS, Dragon uses two 
sets of 16K chips instead of (8) 64K 
chips. There are various hardware 
differences in the Dragon. The Dragon 
uses the PAL tv system instead of the 
U.S. NTSC system. Since there are no 
VHF tv stations in England, the RF 
output is on channel 33 and the 
bandwidth is 8 MHz instead of 6. The 
video mixer chip is a LM1899 instead of 
a MC1372, The power supply (220 
volts, 50 Hz) is outside the computer 
and is connected via a DB-9 socket on 
the back next to the power switch. 
The two joystick, cassette and 
parallel printer jacks are on the left 
side along with the RF output and 
reset button. The Rompak port is on 
the familiar right hand side but there 
is no door. The Dragon 32 has one 
jack that the stock Coco doesn't 
have. There is a five pin din jack on 
the back for video out. This is a 
decided advantage tor those who want 
to do work processing to its fullest. 

To summarize, the Dragon 32 is a 
fine computer with very close 
similarities to the Color Computer. 
The extra features of a better 
keyboard, parallel printer port, video 
output jack and white case are a 
definite advantage. But the best news 
is that a Dragon will soon be coming 
to your neighborhood! Starting this 
summer, a U.S. version of the Dragon 
will begin production in Florida. It 
will be a NTSC version with a serial 
port. Price will be very competitive 
with the Color Computer and will give 
potential Color Computer buyers 
another choice. 

Bob Rosen, Pres. 
SPECTRUM PROJECTS 



EDITOR'S NOTE 

Since this was written, things have 
been firmed up for the American 
version of the Dragon. It Is being 
manufactured and distributed by 

TAMO CORPORATION 

4301 Poche Court West 

New Orleans, La. 70129 

(504) 254-3500 

The "Standard* Dragon will be a 64K 
System which carries a suggested 
retail price of $399.00, with an 
estimated initial delivery date of July 
1983. Joy Sticks, Disk Drives, and 
Software will also be available, 

RLN — 
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DOODLE BUG 



BY COMPUTERWARE 
P.O. BOX 669 

ENCINITftS. Cfl. 92024 

CA8ETTE .24.93 DISK «29. 95 

THE GMC I TESTED UPS « 16K 
CflSETTE VERSION. THIS IS R TAKEOFF FRQfl 
THE POPULAR LADVBOG ARCADE GAME WITH VERY 
GOOD GRAPHICS. IT PLAYS JUST AS FAST AMD 
MEAN AS THE ORIGINAL. THIS GAME IS 
DEFINITELY FOR THE LADYBUG FAN AND A REAL 
CHALLENGE FOR NOVICE OR PRO. THE PLAY 18 
THE SAME FOR ALL LEVELSi THE DIFFERENCE 
IS THE NUMBER OF LADY BUGS YOU GET. FOR 
EACH BOARD YOU CLEAR THE BUGS CHASE I NO 
YOU CHANGE AND GET SMARTER SO THAT EACH 
BOARD GETS HARDER. 

IN THE MAZE THERE ARE HEARTS. DOTS 
AND LETTERS. THESE ADD TO YOUR SCORE AS 
YOUR LADY BUG EATS THEM , HOWEVER THERE 
IS A PROBLEM AS YOU TRY TO EAT THESE 
GOODIES THE BUGS FROM THE BUS BOX IN THE 
CENTER OF THE MAZE TRY TO EAT YOUR LADY 
BUG. IF YOU TIME IT RIGHT YOU CAN GO 
THROUGH THE REVOLVING DOORS AND LOOSE 
THESE PESKY VILLAINS. THE OTHER PROBLEM 
18 THE SKULLS PLACED AT RANDOM AROUND THE 
MAZE. THESE WILL KILL YOU AND MUST BE 
AVOIDED AT ALL COSTS. THE LETTERS BUST BE 
ERTEN WHEN THEY ARE THE RIGHT COLOR TO 
SPELL OUT THE WORDS SPEC I Pi. AND EXTRA. 
THIS CAN BE DOME BY PRESSING THE FIRE 
BUTTON ON THE JOYSTICK TO HALT YOUR 
LADYBUG* S FORWARD MOTION OTHERWISE YOU 
RUN RIGHT OVER THEM. IF YOU SPELL "EXTRA" 
YOU GET AN EXTRA LADYBUG. AND FOR 
-SPECIAL" YOU OET A FULL SET OF NEW LADY 
BUGS TO PLAY WITH. 

THIS IS A FUN GAME AND HILL 
CHALLENGE YOU TO TRY TO BEAT IT. I AM NOT 
SURE WHAT THE HIGHEST SCORE THAT HAS BEEN 
MADE BUT I AM SURE THAT WHOEVER MADE IT 
WILL STILL BE TRYING TO BETTER IT. IT'S 
THAT KIND OF GAME. 



Stuart Hawk in eon 

6*95 S. W. 203rd Court 

Aloha, OR 97007 

l-ji'j) 642-VL4& 

July S v 1903 
NEWS RELEASE! 
FOR IMMEDIATE RELEASE 

D1S* LOADER tor the TRS-BO Color Computer loads meat IfcK 
Mchim language progruii fro* tan. to disk. This n»n 
proora* tskes tap* besed ■tcimi language programs, store* 

thtn on a: ik i and alio** them to run automatical ly. DISK 
LOADER im •■socially dniqntd to load pr^nm. which 
intar far* with normal disk operation. Save, multiple* 

COpl.*, iIIdhi ricii-:ng thr progrin, *nc) automatically 

Qlv*i program load and t>«uti addr*se*a. DISK LOADER i* 
supplied on tap* with »iiy-tD-optr»ti instructions. Works 
with any 32K or 6*K Color Computer Disk system. sl3.°S ppd 
fro*. Stuart Hawkinaon, 6*95 S. W. 203rd Court, Aloha, OR 
*7007 . 
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XSU SALEM R2S2A2CH 

Heat Rain Street 

Maw Sslaa, Hsu. 01355 

MTV ffiOIfJCT Aitti'Qs.'SCEMEN? 
KAt£IDOFH«<E AUAVS YOU TO "SEE" MUSIC ON TV 

Here** something mff to do with your CoCo besides playing gases 1 

Tha Kaleidophocia allows you to Interface to any hi -ft and sea the aualc 
on TY. It's easy to Las tall — Just plug iota the headphone Jack on the 
hi -ft and tha joys tick port on your ooaputar. 

Besides tha hard wax* (which Includes all necessary pl-jgs *od cables) 
you receive a free Issue of KsleidoEhonlcs . a cassette "wageslne" of 
prograas Tear the Kaleldophar.e . The current issue consists of ■are than 
a dozen display programs In 2A5IC (Just choose then froa a aer.u) plus 
nine machine language routines for high speed effects. 

There's also an "Instant program" feature uhich is rery nice — you 
Just type In letters on the keyboard to create a whole new display program 
in seconds. Of course, you can also program It yourself In BASIC or machine 
language. Ten pages of detailed instructions are included. 

The price seems reason* hie, considering that you get both the hardvere, 
fully aasenbled, and quit* a lot of software to run it (future updates axe 
also planned). Tou eaa even use the display nodes that are unavailable in 
Extended 2ASI2! 

Barents say find thie s good way to get their kids interested In computing 
And it's a great solution to the old question of "What can you do with it 
baaidaa play gases ?" 

Kaleldc phone , Sew Sales Research, Weat Main Street, 
Sew Sales, Mass. 01355- 4*9.95. 16K, either BASIC, 



SPECTRUM 

32K RAM Button $ 2.99 

NANOS Reference Card $ 3.99 

64K RAM Button $ 4.99 

Coco Editor Assembler..... $ 6.95 

Coco Tech Manual $ 7.95 

16K RAM Chips f 9.95 

Coco Secrets Revealed Book .$ 14.95 

LED On/Off Indicator 4 14 - 95 

Coco Light Pen. $ 19.95 

ATARI Joystick Interface $ 19.95 

Video Interface Kit .....§ 24.95 

16K-32K Upgrade Kit 4 25.95 

6883 SAM Chip.... ...$ 29.95 

6809E CPU Chip 4 29.95 

Basic ROM 1.1 ..J 36.00 

64K RAM Chips .$ 49.95 

MARK DATA Keyboard ...$ 69.95 

BOTEK Printer Interface $ 69.95 

Extended Basic ROM .$ 84.00 

Disk Controller. ,$ 139.95 

COLOR COMPUTERS $ CALL 

Call or Write far FREE Catalog 

SPECTRUM PROJECTS 

93-15 86th Or Woodhaven, New York 1 142 1 

Add Sales Tax & $3.00 for S/H 

## Dealer/Club Inquires Invited •• 

212 441-2807 
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COMMUNICATING 

with your 

Color Computer 



One of the added features o£ the Color 
Computer is the built in RS232 
interface. It can be used to hook up 
a serial printer like the DMP-100. 
More important though, it can be used 
to help you communicate. Communicate? 
That's right!! There is a Whole new 
world of telecommunications that many 
COCO owners are unaware of. Besides 
playing games and writing programs, 
you can hook up a modem to your RS232 
port. A modem is an electronic device 
which converts the computer's 
electrical pulses bit by bit into 
audible sounds that can be 
transmitted over the phone lines. 
Modem stands for Modulator/ 
DEModulator and there are two types 
available. 

The two types of modems currently 
available on the market are the 
Di rec t-connect modem and the 
Acoustic-coupled modem. Both have 
their advantages. The Direct-cormect 
unit hooks right into the phone lines. 
The Radio Shack DC Modem I (26-1172) 
allows you to unplug your phone from 
the jack and hook it into their unit. 
Then you can plug the cable from the 
Modem I back into your phone jack. 
This assumes that your phone and jack 
are modular. If not. Radio Shack 
sells two adapters, 279-393 and 279- 
351, that will convert your hook up to 
modular. Since the Dlrect-Connect 
unit hooks right into the line, 
virtually no external noise can be 
detected which means someone else in 
the room can be watching tv or 
listening to a stereo. The Acoustic- 
Coupled Modem is even easier to hook 
up. The hookup is the same as adding 
a telephone answering machine. If you 
have no extra jacks, Radio Shack sells 
two *Y" adapters, 279-357 and 279- 
370, for modular and 4 prong systems. 
The Acoustic-Coupled Modem Is more 
susceptible to line noise as you are 
placing your phone's receiver into the 
unit's two cups. This can be a 
problem If you are calling long 
distance and the signal on the other 
end is weak. Another problem is that 
today's modern phones might not fit 
the modem's circular cups (Slim line 
phones). One advantage to this modem 
Is that it is more flexible to use with 
multi-line phone systems than the IX 
Modem I because all you have to do is 
push buttons to use the modem on 
another line. The only other piece of 
hardware you will need for your modem 
is a serial cable to hook it up to the 
RS232 port. For Radio Shack modems, 
you will need a 4-pin DIN to 4-pin DIN 
cable and for non-Radio Shack modems 
a 4 pin DIN to DS25 cable. These are 
available from the Shack as catalog 
numbers 26-3020 and 26-3014 
respectively. Also, available from 
Spectrum Projects are two cables 



which you might need. One is a 
Printer/Modem Extension Cable which 
allows you to place your modem in 
another location. It extends your 3 
foot Radio Shack cable another 10 
feet* The second cable Is the RS232 
Expansion Cable. This is a "Y" 
adapter cable which allows you to hook 
up your printer and modem inline 
independently at the same time. This 
eliminates constant swapping out of 
cables, since the Color Computer has 
only one RS232 port. Also, as you will 
see later on, it will come In handy 
when using a smart terminal program. 

Now that you have the hardware 
situation taken care of, you will need 
software. As with the modems, there 
are two types of software. The first 
type is known &s Dumb Terminal 
Software. Radio Shack sells a version 
under the Videotex name. It is 
catalog number 26-2222 and includes 
one free hour on the Dow Jones and 
CompuServe Networks. The software 
allows access to these networks, but 
that's about all it does. It lacks the 
desired features that a smart 
terminal program contains. 

Now you might ask, what can a Smart 
Terminal Program do for me that a Dunb 
Terminal doesn't? The Smart Terminal 
Program can take the information you 
access from a telecommunications 
system and store It into your 
computer's memory. After you go off 
line from a system, you have the option 
of printing it out or writing it as a 
cassette or disk tile. Or, you can 
type a message offline and then upload 
with a single keystroke to the Host 
computer. Since networks such as 
CompuServe and The Source charge for 
their services, this can save you 
money as it can transmit it faster 
than you can type and it allows you to 
examine It for errors while offline. 
Another nice feature of a Smart 
Terminal Program is that it enables 
you to change any RS232 or printer 
parameters. For example, it allows 
you to access halt duplex systems and 
use 1200 baud modems. You can run 
your printer at 1200 baud and insert a 
carriage return after a linefeed. 
Another bonus a Smart Terminal 
Program has to offer is that you can 
scroll online or offline up to 12 lines 
at a time. Where can you purchase 
such a program? Spectrum Projects 
sells their Smart Terminal Package 
under the nam* C0L0RCOM/E. It is 
available on Rompack or Disk for 
$49.95. It does not offer any free 
time for CompuServe and Dow Jones, but 
does offer the desired features of a 
Smart Terminal Program. One can still 
purchase from Radio Shack a Universal 
Sign Up Kit (26-2224) to go on line 
with CompuServe and Dow Jones. 
However, this kit contains no 
software. It can be used though in 
conjunction with a Smart Terminal 
Program. 

Now that you know more about the 
hardware and software which Is 
involved, you may ask, what else can I 
access besides large data bases which 



charge for the use of their systems? 
The answer is a growing phenomena 
called Bulletin Board Services which 
are mushrooming all over the United 
States, What is a Bulletin Board 
Service, you ask? A Bulletin Board 
Service, or BBS for short, consists of 
an individual with a personal computer 
and an auto-answer modem set up to 
have outside callers access their 
computer, (Yes, your own mini 
CompuServe!) Aside from the auto 
answer modem, one needs special BBS 
Software to run the system. For 
example , Spectrum Projects owns and 
operates TWO BBS's which totally 
support the Color Computer. The 
first system can be accessed by 
dialing (212) 441-3755. It is operated 
and run on a Model III with four 
double-headed disk drives. It has a 
disk storage capacity of 2.6 
megabytes. The system is FREE and NO 
PASSWORDS are needed to access the 
system. Some features of the system 
are a message retrieval section, a 
downloading section, a merchandise 
section, and a Color Graphics section. 
Using the Smart Terminal Program 
COLORCOM/E, you can dial into the 
system and capture files from the 
download section. These files consist 
of games and utilities which you can 
run on your Color Computer. Also, as 
an added feature, Color Graphics can 
be accessed through the phone lines 
right onto your TV set. COLORCOM/E 
has the ability to read 8 bit color 
Graphics, In the message retrieval 
section you can leave or retrieve 
messages with other users of the 
system. It is a way to get info on the 
Color Computer that is not readily 
available through other channels. You 
can ask technical questions, get 
opinions on Color Computer Hardware 
or Software, and place an ad. In the 
merchandise section is a list and 
description of products from the 
leading Color Computer advertisers. 

There is one last thing you can do 
with your modem. Become a COCO sysopi 
Sysop stands for SYStem Operator* 
The second bbs which is operated by 
SPECTRUM PROJECTS can be accessed by 
dialing (212) 441-3766. It will also 
be accessed if you call BBSfl and it is 
being used. It is switched over from 
BBSil to BBS#2 via ringover. The 
second Bulletin Board Is operated on a 
Color Computer. The minimum 
requirements to run a BBS on a Color 
Computer are 64K of RAM, two disk 
drives, and a auto answer modem. And 
of course, BBS softwarel 

Bulletin Boards have proven to be very 
profitable investments as yours truly 
can attest to. Just imagine sitting 
in front of your COCO BBS and watching 
i t be accessed by a complete stranger 
at any time of day or night from 
anywhere in the worldl Make way for 
the Bulletin Board System - THE WAVE 
OF THE FUTURE!!! 

Bob Rosen, Pres. 
Spectrum Projects 
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TRS-80C Color Computer 
16K Extended Basic 

After spending a year and a Halt 
learning Basic and some machine 
language on my Sinclair micro I 
decided it was time to go to a machine 
with a little more versatility. Partly 
because of the lower cost I decided to 
buy the TRS-60C Color Computer, 

After a month or so I wrote a short 
Basic program to test the speed of 
the CoCo. I was pleasantly surprised. 

About the Program 

The program is fully documented on the 
screen. Use the Right Joystick to 
move the laser cannon left and right; 
use the firebutton to shoot down the 
•H" wing fighters. There will be 10 
fighters (more if you have consecutive 
hits) , A hit will be so indicated on 
the graphics screen and a score after 
each round. 

The following will explain the 
mechanics of the program: 

90 - A$ draws "HIT" on graphics 

screen 
100 - L$ is sound for laser cannon 

fire 
110 - B$ prints the title at the top 

of the graphics screen 
130-180 - draws the starbase 
190-220 - draws "H* wing fighter and 

"gets" it in matrix dimensioned by 

A(ll f ll) 

240 - sets variables to zero for 

score keeping, number of attempts, 

and number of fighters to appear 
260 - to randomly place fighters on 

screen and erase previous position 

of laser cannon 
280 - laser tire from fighter 
290 - "puts" fighter randomly on 

screen controlled by X and Y 
300 - detects whether fire button is 

pressed or not 
310 - fires the cannon from joystick 

position vertically 
320 - variable N keeps track of no. of 

shots fired 
330 - checks for hit or no-hit 
350 - explosion and sound if fighter 

is hit 
370 - back to main loop 
380 - subroutine to set new position 

of cannon once each time through 

the main loop 
400-490 - routine to place the next 

fighter on screen if previous one 

is missed 
500-530 - subroutine for instructions 
540-600 - gives score and status of 

starbase and restart 

- Subroutine to create animation 



Note: For greater speed enter from 
the keyboard: POKE 65495,0 (will not 

^. work on machines manufactured before 
Oct '82). Before saving to tape do 
the following: POKE 65494,0. If you 
fail to do this the program will not 
load back into the machine. To test 
your machine poke 65495,0. If your 

^ cursor speeds up considerably you can 



probably safely run the program at the 
high speed. If there is no noticeable 
difference in the cursor POKE 65494,0 
to get it back to normal (if the whole 
system is hung up, hit RESET and 
reload the Program) and then RUN the 
program. 

Victor Rogers 



10 "LASER WARS 

20 'BY VICTOR ROGERS 

30 '3107 ELMORE AVE. -CHATTANOOGA 

, TENNESSEE 37415 

40 CLS3 

50 GOSUB 500 

60 DIM A(ll r ll) 

70 CLS 

80 JXKWSTK(0) 

90 A$=*BM110,170?U5;D10;U5;R3;U5 

|D10;O5?B;R6;U7;B;U2;U1;B;R9;D5; 

U10;L3,-R6 W 

100 LS--V31T25504;AGFED* 

110 B$» "BM60,0;D8;R4;B;R3;U8;R4 

;D4;L4;R4;D4;BjR3jR4 f U4;L4;U4;R4 

;BjR3;R4;L4;D4;R3;L3;D4;R4;B;R3; 

U8;R4;D4;L4;Rl;Dl;Rl;bl;Rl;Dl;Rl 

;Dl;Rl;BjR6;U8;D8jRl;Ul;RlfUl?R2 

3 Dl ; Rl ; Dl ; Rl ; U8 ;D8 ; B ; R3; 08 ; R4; D4 

,-L4;R4jD4;B;R3;U8;R4;D4;L4jRl;Dl 

;Rl;Dl;Rl|DlfRl;Dl;Rl" 

120 PM0DE4,lsPCLS 

130 CIRCLE (128,90), 30,,. 25 

140 CIRCLE (128, 65), 20,,. 25 

150 CIRCLE (128, 127) ,45,,. 25 

160 LINE (45, 140) -(94, 55), PSET 

170 LINE(211,140)-(162,55),PSET 

180 LINE(94,55)-(162,55),PSET 

190 DRAW"BM128,127,-U4jD8;U4;R10; 

U4;D8- 

200 CIRCLE<134,127),4,,.25 

210 CIRCLE(132,127),4.5,,.25 

220 GET(128,122)-(138,132),A,G 

230 DRAW RS 

250 SCREEN 1,1 

260 X~RND(234)+12:¥*RND{43)+12jL 

INE(J*4,192)-((J*4)+6,186),FRESE 

T,BF: LINE (105, 175) -(134, 155), PRE 

SET,BF 

270 GOSUB 380 

275 SCREEN 1,1 

290 PUT(X,Y)-(X+10,Y+l0) f A,AND 

295 GOSUB 1000 

296 IFX>12 AND R<-123THENX-X-10E 
LSE X=X+10::IP Y>12 AND RK12 Tti 
EN Y-Y-10ELSE Y=Y+10 

298 PUT(X,Y)-(X+10,Y+10),A,PSET 

299 SOUND12,l:LINE(X,Y+9)-(J*4 r l 
75),PSET:LINE(X,Y+9)-(J*4,175),P 
RESET 

300 P=PEEK (65280): IF P=2540R P»l 
26 THEN PLAY L$ 

310 IF P=254 OR P-126 THEN LINE( 

J*4, 192) - (J*4, 12) , PSETs LINE (J*4, 

1 92) - {J*4 , 1 2 ) , PRESET : N=N+1 

320 IFN>10THEN GOTO400 

330 IF PPOINT(X+5 ,Y+5)=0 OR PPO 

INT(X+6,Y+5)=0 OR PP0INT(X+7,Y+5 

)-0 OR PPOINT(X+4,Y+5)-0 OR PPOI 

NT(X+7,Y+5)=0 THEN 350 

340 GOTO 360 

350 CIRCLE(X+5,Y+5),2:PMNT(X,Y) 

,0,1:LINE(X,Y)-(X+10,Y+10), PRESS 

T,BFs PLAY"V3101T255ADBAGFED" : F=F 

+ltN=0:T"T+l:DRAW A$:GOTO260 

360 LINE(J*4,192)-((J*4)+6,186), 

PRESET, BF 

370 GOTO270 

380 J<TOYSTK(0):LINE(J*4,192)-(( 

J*4)+6,186),PSET,BF 

390 RETURN 

400 LINE (X,Y)-(X+10,Y+10), PRESET 



,BF:N«0 

410 SOUND 200, 4: SOUND 220,4 

420 PUT( 122,61) -(1 32,69) ,A,PSET 

430 FOR G=l TO 500:NEXT 

440 LINE (122,61) -(132, 69), PRESET 

,BF 

450 CIRCLEU26,65),20,,.25 
460 PUT(123, 85) -(133,95) ,A,PSET 
470 FOR G=l TO 500JNEXT 
480 T=T+1:IF T>-10 THEN 540 
490 LINE( 123,85) -(133,95), PRESET 
,BF:GOTO260 

500 PRINT§39,"***LASER WARS***" 
510 PRINT065,"TO DESTROY FIGHTE 
RS USE RIGHT JOYSTICK (MOVE RIGHT 
, LEFT AND PRESS FIREBUTTON) . 
YOU HAVE (10) SHOTS AT EACH FIGHT 
ER. THERE WILL BE (10) FIGHTE 
RS ATTACK YOU AND YOUR STARBASE. 
GOOD LUCK CQMMANDERinil!* 
520 PRINTi 327, "PRESS ANY KEY TO 
BEGIN." 

530 GS=INKEY$:IF G$<>"" THEN RET 
URN ELSE 530 
540 CLS3:SCREEN0,1 
550 PRINT§65,"YOU DESTROYED "F" 

OF "T" FIGHTERS.* 
560 IF F>7 THEN PRINTS 256, •*THE 
STARBASE IS SECURE*" ELSE PRINT§ 
256,"*THE STARBASE IS LOST*" 
570 PRINTS 32 5, "AGAIN? (Y/N) ■ 
580 R$=INKEY$:IFR$=""THEN580 
590 IFR$="N"THEN ENDELSE600 
600 RUN40 

1000 LINE(X,Y)-(X+10,Y+10>, PRESS 
T,BF 

1005 R-RND(234)+12:R1=RND(43)+12 
1020 RETURN 



Rail Runner 



BY COMPUTE RMARE 
P.O. BOX 6£9 

ENCIINITHS, Cfi. 92024 

CASETTE «2i.93 DISK «2e.9S 

I TESTED THE TAPE VERSION WHICH 
TAKES 16K. THIS GOME IS A "RESCUE" TYPE 

acre with a screen which is in some ways 

LIKE FROGGEH. THE MOVEMENT OF YOUR RAIL 
RUNNER IS CONTROLLED BY THE ARROW KEYS ON 
THE KEYBOARD AND THE SCREEN IS OUITE 
BUSY. THE GOME MILL PROBABLY APPEAL HORE 
TO THE YOUNG THAN THE EXPERIENCED PLAYER. 
THE SCREEN IS FILLED WITH TRACKS OCCUPIED 
BY MOVING HANDCARS AND ENGINES* AND YOU 
rmjST MANEUVER YOUR RAIL RUNNER FROM THE 
TOP OF TTC SCREEN TO THE BOTTOM WITHOUT 
BEING HIT THEN ENTER THE SQUARE WHERE THE 
HOBOES WAIT TO BE RESCUED. ON THE SECOND 
BOARD THE YARD IS REAL BUSY. THE GRAPHICS 
ARE WELL DONE BUT THERE IS LITTLE SOUND 
TO GO WITH THE MOVEMENT OF THE SCREEN. 

THIS GAME WILL APPEAL TO THE 
FROGGER FANS BY VIRTUE OF IT'S FROGGER 
LIKE SCREEN. AND IT WILL APPEAL TO THE 
YOUNGER PLAYERS BY VIRTUE OF IT'S 
INTERESTING SCREEN. IT SHOULD BE A VERY 
GOOD PROGRAM FOR DEVELOPMENT OF HAND EYE 
COORDINATION IN THE YOUNGER PLAYER. THE 
PLAY IS OUITE FAST AND THERE ARE THREE 
LEVELS OF DIFICULTY TO KEEP THE GAME 
INTRESTING THE FIRST LEVEL IS SIMPLE AND 
THE THIRD IS COMPLEX REOUIREING TWO 
PASSES TO SAVE THE HOBO. FOR THE YOUNGER 
PLAYER I HEARTILY RECOMMEND BUYING IT. 



Joe Patrick 
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PBJ, Inc. 

»n COLUMBIA AVCNUC 

NORTH BERGEN. NCW JSRSCV 070*7 

rWOf«X: (30»l J30-HK4 




PRODUCT RNNOUNCEMENT 

J &J, Ine. 1* pleased to announce the *v*i : jb 1 1 i ty of tn» following 
flr-odjct* foe tne ^«ii Shack Cot of* Ccmeuter* 

M33D-OAK 

The «iO*D-PAH i* a vidio board ce*Lgn«d to plug into the expansion 
Sort Of trie Color Comoutar and previse* t."ie HMT with a high 
quality, 80 column video output, The ooei"a 11 comoatlole with 
mc-at norv-gr#onic Basic program* and can 3* u*«a mtd dUM tn rough. 
t-* a** of « "V" caole. Software d row iced with tHe DOar-d proviBtt 
t* r, 'i; r '"i 'unctions *ucn a«| ir««t to anc of llne t erase to ana) of 
wm«i noma cuftor, sound sail, w-y cursor posit toning, ate. and 
t-ia ability to reorogram tit acraan format for romaatitjility with 
©tner computers. Additional aoftware auooort Includes a Flex 
"ten, wnien allows the user to run ALL standard Flaw software 
wi incut modification, and an entranced version of TEXPWIIJ (t#«t 
editorYaroceseor). Future software support Hill include 

•areaa sleet and ausinas* application programs. 

C-C BUS 

Trie C-C BUS is an axoanslon Pus wit en connects to t.it miteenaion 
sort of 5-te Color Comouter and provides tne user „itn sin software 
sal act sole e»o*nsion wrts. The board is completely compatible 
witfi mny size system, and automatically sense* system) site to 
arevent consent ion aroolem*. Tne board also allows the user to 
tN»« Memory beyond tne 6*K limit by utilizing a bank witchlnj 
eenemm, A tyaical system might contain a disk controller, a 
parallel printer cartridge, a l&K ROM board and a WOftD-PAK all 
installed and available to tne CPU. The C-C BUS can alaa be 
susoiied -it-i an optional power supply to poiier tne peripheral 
cartridges/ooares. 

pCM-pok jsk RAn/flOM an pans ton board < supplied with ISM Jtflft). 
■ 

P-C PAK Centronics comoatibLm parallel printer port treat time 
clock available aa an option!. 

PHOTO CoCo Prototyping board. 

AH of tne a oove arm available aa bare Boards witn documentation* 
Prices are as follows- 



UG30-OAK 


SI 39. 93 


(alt) 


S23.93 


fbb) 


C-C BUS 


•123.00 


(alt) 


«7.93 


(cos 


wen- pak 


•110,00 


fast) 


• 17.93 


OP) 


P-C WK 


• 79.95 


C*4t. 


•10.93 


(bal 


PftOTO CoCo 


• l*,93 









DISTRIBUTES BV 
COflPUTERWARE 
P.O. BOX 669 

ENCINITAS. CA. 9202a 

CASETTE S21.95 DISK S2G.35 

THE GATE I TESTED WAS A 1BK 
CASETTE VERSION. THIS IS AN EXCELLENT 

ADAPTATION OF THE RRCADE MILLIPEDE GAME. 
IT HAS EXCELLENT HI -RES. GRAPHICS. AND 
GOOD PLAY ACTION FROM SLOW TD VERY FAST 
ON FOUR DISTINCT LEVELS. THE ONLY THINGS 
HISSING FROM THE PLAVFTELD ARE THE DDT 
CANISTERS AND THE WANDERING BUG AT Tr*I 
BOTTOM OF THE SCREEN. 

ONE OF THE NICE TOUCHES OF THIS 
GAME IS THE ABILITY TO DC ALL OF YQU« 
NECESSARY SELECTIONS FROM THE JOYSTICK 
INSTEAD DF HAVING TO USE THE KEYBOARD. 
THE PLAY ON THE FIRST TWO LEVELS <NICE 
AND RUFF) IS SLOW AND VERY GOOD FOR THE 
BEGINNER .BUT THE OTHE TWO (FOWL AND 
MEAN) ARE DEFINITELY FOR THE ADVANCED 
PLAYER AS THE ACTION BECOMES FAST AND 
FURIOUS. THOSE OF YOU WHO HAVE PURCHASED 
THE WICQ ADAPTOR FOR THE HTRRI JOYSTICKS 
WILL FIND THAT NOT EVERYTHING WILL WORK 
PROPERLY. I EXPERIENCED SOME TROUBLE IN 
GETTING THIS AMD THE JOYSTICKS MODIFIED 
BY THE ARTICLE IN CREATIVE COMPUTING TO 
SELECT THE ROUGH PLAY LEVEL. OTHERWISE 
THERE WAS NOT ANY PROBLEMS. 

THE BOARD IS WELL DONE AND I 
FOUND THAT THE HIGHER THE LEVEL SELECTED 
THE MORE MUSHROOMS ON SCREEN THESE CAN 
HELP YOU IF THEY ARE IN P, ROW BY ROUTING 
THE WILLAPEDE TOWARD YOU. BUT WATCH OUT 
THERE ARE ALWAYS AT LEAST FOUR HEADS ON 
THE BOARD AND THE FLEAS FALL RT RANDOM 
AND VERY FAST. THIS IS VERY LIKE 
MILLIPEDE IN IT'S ACTIONS. I FOUND NO 
GHOSTS < THAT IS THINGS ON THE SCREEN 
THAT YOUR SHOTS PASS THROUGH WITHOUT 
EFFECT) OR OTHER STRANGE SUDDEN MOVES 
WHICH OCCUR IN SOME OTHER GAMES. ONE 
THING I DID FIND WAS THAT YOU CAN 
SEEMINGLY GET HUNG UP IN A SLOT BETWEEN 
THE MUSHROOMS. THIS OCCURS BECAUSE YOU 
nnewn thc now Dinoomxr rem} cm orm-t 
LEAVE THAT WAY, DURING THE HEAT OF THE 
GAME THIS FOCT WILL PROBABLY ESCAPE YOU. 
IT SURE DID ME! 

OF THE GAMES OF THIS TYPE I HAVE 
PLAYED THIS IS THE SMOOTHEST AND MOST 
ENTERTAINING I HAVE SEEN. IT IS WELL 
WORTH YOUR TIME AND MONEY TO GET A COPY . 
TRY IT YOU'LL LIKE IT ! 



Patrick 
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SUPER SLEUTH DISASSEMBLER 

I iMtJy 'c 640. -Wl J 

t- it- ISO HDHiJ 6i 

ODKcr 0-*r imtM ifttOi/iMhJi 

f •-• C'-iL.i FL£» 
C(C»«'<ii h 
CROSS-ASSEMBLERS 
iippcify locOoaa 'finon 
»m; laa ai MSB si 

PESUOOINO SIMULATORS 

IWK*t lor «9» Vi»?l 

asoa-TO-eaoa assembler xiator 
I0B0 « a aaoa pic x la tors 



E»ch ttS-rUEX 

*1 01 -os/a 

eMBLBfl 

S4S.00 

tach ISOFLE* 

J MO J 0/ 

Each B75- FLEX 

tioo-oa/a 

stsfcex 
sas-os/a 

Both «SOFIFX 

S79-OS/S 
PULL SCREEN TSC XBABIC RROORAMS POR RLSX 

iw-th luVnut&Qr i-i>nl'Gt 
MAILING LIST El SO 

INVENTORV/MRP S10O 

TABULA RASA SPREADSHEET $1Q0 

XBASIC/X PC UTILITI ES All Si" ft 

i inn «••• apt. so.i 4*ru 

Conifultr SyH.mi Coniulljnli, tne. 

1 494 Latta Lane 

Conyer*. Georgia 30207 

404 483 1 71 7/457 

Program* In source an S'VS" disk. 

Detailed printed manual* provided. 

Call lor catalog or dealer information. 

VISA and MASTER CARD accepted 
US Funds Only 



Add 5% Snipping 



«* I- ma* 4mmvC 
ft 4 ***«>»•. <f W^.'1M*T4 
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baby COCO 



There it was, sitting in a glass 
cabinet along with its user manual - 
Tandy's newest computer. It was 
SMALLI According to the salesman, 
it is going to blow the competition out 
«£ the water. Radio Shack's marketing 
people call it the Micro Color 
Computer. The manual designates it as 
the MC-10. 1 hereby dub it (may I have 
the ceremonial sword, please?) Baby 
CoCo, 

I picked one up recently, and had a 
fascinating weekend poking around 
inside. Herewith is my first report, 

HCW GOOD IS IT? 

Graphics are the same as you get on the 
standard (non-extended BASIC) CoCo. 
This puts the Baby CoCo in the same 
league as the Timex 1000, which is a 
long way behind the VIC-20, TI-99/4A, 
and Atari 400. 

Text on the screen is identical to the 
standard CoCo — 32 characters wide 
by 16 lines high. No lower-case is 
supported, although you can get 
reversed letters. I doubt that we 
will see any 51x24 upgrades for this 
computer. These depend on the 6863 
SAM Chip, which is not present in the 
Baby CoCo. 

Memory is 4K standard. Surprise; This 
is 4224, not 4096. A 16,384 byte 
expander module Is to be made 
available in the future. Baby CoCo is 
a little above most of its 
competition in this regard — partly 
because the graphics are so poor. 



BASIC is (of, course) from Microsoft, 
with Radio Shack's syntax. Provided 
PEEK and POKE are not used, almost 
anything written for the standard 
CoCo will work on the Baby CoCo if it 
fits Into memory. You will (for the 
present, at least) have to type it in 
because the cassettes are not 
compatible. 



M 



A couple of surprises: 

* The ELSE clause is missing. 

* The Baby CoCo has several functions 
not available in the standard CoCo 
unless you get Extended BASIC: 
VARPTR, LOG, EXP, SQR. 

* Contrary to the manual's statement, 
POKE will work to any address 
between and 65535. Video RAM is 
from 16384 to 16895. Just for fun, 
try POKE 20,0 and see if you can 
figure out what happened (it won't 
break the MC-10, though you will 
have to switch it off to regain 
control) , 

* CLEAR has a second parameter, 
whose function is identical to that 
in the standard CoCo. There is 
also an EXEC statement. Sorry, no 
CLOADM — hence no assembler* 
There is no information in the 
manual about machine language 
programs. But a USR function 
exists if we can only figure out 
where to POKE the execution 
address. 



Cassette tapes use a similar format. 
Some salesmen will insist that it is 
the same. This does not mean you can 
CSAVE a program on the CoCo and get 
it to CLOAD on the baby CoCo. We'll 
discuss this matter further another 
time. 

Printer interface is identical to the 
standard CoCo. The manual does not 
give you the POKE values for non- 
standard baud rates. Here they are. 



\* 



m 



5* 






NEWS RELEASE 

itouid ba o\ mr*riu id )** nidni I 



Baud Rate 


Value of n 


300 


244 


600 


118 (default) 


1200 


56 


2400 


24 



These values all work using a Bo-Tek 
interface. To use a baud rate other 
than 600, simply POKE the value from 
the table above into 16932, For 
example, setting your machine to 2400 
baud is done by: 

POKE 16932,24 

I have tested all of these numbers 
out with a BoTek interface ($69.95, 
their address is 4949 Hampshire, 
Utlca MI 48087) and an Epson MX-80 
printer. If you have occasional bad 
characters, try adjusting the number 
up or down slightly. 

Serial Interface is {sorry 'bout that) 
almost identical to the standard 
CoCo. My regret is because the 6803 
has a built-in UART which Radio Shack 
has not used. It will probably work 
but only at unusable baud rates such 
as 244.5. 

Expansion is going to be difficult on 
the system. There is no ROM socket, 
only a card-edge on the back similar 
to the Timex machine . Reliability of 
the connection should be fairly good 
— they have a couple of screw holes 
that will allow a firm grip to 
whatever plugs in there. Of course, 
no gold-plated contacts. 

There is no provision for joysticks. 

CONCLUSION 

What will Radio Shack Accomplish with 
their new computer? Not much at the 
current price. Once they get it below 
$100, advertising should get the 
machine to sell — but only if they come 
up with lots of inexpensive software on 
cassette. With no ROM pack socket, 
that may be exactly what they have in 
mind. 



by John Beckett 
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Spectrum Projects is pleased to announce their 
newest product the -SPECTIUlCIITmCElTEr. 
The ICC eiminates ever hawing to grope around 
behind your Color Computer, fumMng with cables 
and plugs by extending all the jacks to an 
interface box which can be mounted anywhere 

Features of the 'SPECTRUM CIITRIi tllTEl* are : 

1) A switch selected Printer/Modem port Now 
both your printer and modem can be plugged in 
at the same time, but individually selected by a 
top mounted switch 

2) A cassette switch for those people who don't 
own CTR-80 and CCfl-S 1 cassette recorders. 
Eliminates unplugging cables in order to rewind 
or fast forward tape, 

3) A LED power indicator to tei you whether 
your computer la on or off. 



$99.95 + $3.00 S/H 



aPEe™n mum 
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Wenfwan *¥. HOI 
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BY COMPUTE RWORE 
P.O. BOX 669 

ENCIN1TAS. CO. 92C24 

COSETTE 421.33 DISK *26. 39 

THE PROGRAM I TESTED MBS R 16K 
CflSErTE VERSION. THIS IS A GOOD 

ELECTRONIC SYNTHESIZER PROGRAM FOR THE 
COLOR COMPUTER. IT PRODUCES ON EXCELLENT 
RANGE OF MUSICAL NOTES FROM THE COMMON TO 
THE EXOTIC. THE PROGRAM IS QUITE COMPLEX 
SO THE BOOK MUST BE READ FIRST OR YOU 
HILL BE LIKELY TO HAVE MUTCH TROUBLE 
GETTING STARTED, IT IS PLEASANT TO HOVE 
THE DISPLAY OF ALL THE KEYS AND SETTINGS 
ON THE SCREEN OF THE TV. AUDIO COMES FROM 
THt TV SPEAKER 06 WELL. AS THE CA6ETTE 
PLUG MAKING IT POSSIBLE TO RECORD YOUA 
MASTERPIECES ON TAPE. IT IB ABOUT LIKE 
USING ONE OF THE PORTABLE SYNTHESIZERS ON 
THE I1ARKET, 

THE SYNTHESIZER RESPONDS WELL AND 
IT IS POSSIBLE TO SET UP COMB! NOT ION 
USING THE BOSIC VOICES WHICH SOUNDS 
EITHER LIKE A PLEASANT ORGAN OR THE 
WILDEST "OUTER SPACE" TYPE OF MUSIC. YOU 
HOVE COMPLETE CONTHOLL OF -ADSR" WHICH 
GIVES YOU TOTAL CONTHOLL OVER THE SOUNDS 
THAT YOU HILL GENERATE. THE KEYBOARD IS 

REPRESENTED BY THE UPPER OR "QWERTY" ROW 
WITH THE NUMERIC KEYS REPRESENTING THE 
PLOTS OND SHARPS. THE LOWER TWO RONS 

CONTROLL SETTING OF VOICE, ADSR. AND 
OTHER PAREnlTERS SUCH OS FELT WHICH 
CONTROLLS THE DURATION OF THE NOTE OR THE 
BREAK FEATURE WHICH SIMULATES THE UP OR 
DOWNWARD SLIDE OF fi NOTE. IT IS POSSIBLE 
TO PRODUCE A NOTE WHICH WILL MAKE THE 
PROGRAM OPPEOR TO BE LOCKED UP 

COMPLETELY. THIS IS EOSILV ESCAPED FROM 
BY USING THE LHNCEL KEY. THE CONDITION 
USUALLY OCCURS WHEN YOU SELECT A NOTE 
WHICH IS TOO LOW TO HEAR AND THE FELT 
STOP HAS BEEN SET TO 1 WHICH PRODUCES A 
LOW CONTINUOUS NOTE YOU CAN'T HEAR, THE 
KEYBOARD ACTION IS CLEAN OND SMOOTH THE 
MOTES ARE ACCURATE AND WITHOUT STATIC OR 
POP, 

THE PROGRAM DOCUMENTATION EXPLAINS 
THE OPERATION OF THE SYNTHESIZER QUITE 
WELL. HOWEVER A NEOPHYTE LIKE MYSELF. WHO 
HAS LITTLE MUSICAL EXPERIENCE. WILL NEED 
TO CAREFULLY READ THE BOOK AND POSSIBLY 
SOME OTHERS ALSO. BEFORE BECOMING 

COMPETENT IN USING IT. NOT HAVING BEEN 
EXPOSED TO SYNTHESIZER OPERATION BEFORE I 
FOUND MYSELF FREQUENTLY BEWILDERED BY THE 
TECHNICAL TERMS ENCOUNTERED IN THE 
MANUAL. 

THIS PROGRAM HILL BE A HIT WITH 
THE PEOPLE WHO ARE INTO ELECTRONIC MUSIC, 
IT IB A VERY EASY PROGRAM TO USE ONCE YOU 
UNDERSTAND HOW TO USE IT. ONCE FAMILIAR 
WITH THE STOPS AND KEYBOARD RANGE YOU 
WILL ENJOY CREATING VOUA OWN ORGAN OR 
"STAR WARS" TYPE MUSIC. GIVE IT A TRY AND 
yrjj WILL SPEND HONY HOURS PLAVINQ YOUR 
OWN KIND OF MUSIC. YOU MIGHT EVEN WRITE A 
NEW HIT TIME . 



Joe Patrick 

Color Micro Journal 



SUPER 

Lunar Lander 

Requires 16K, EXT-BASIC, and Joystick 

•Lunar Lander" was one of the popular 
early Arcade Games at about the time 
that the Color Computer began to 
appear In the Radio Shack Computer 
Centers. With the, at that time, 
unusual BASIC Graphic and Sound 
Commands provided by the Extended 
Basic ROM, it was a natural for the 
new Computer (and was one of the first 
Games available for it) . With an Aero- 
space Engineering Degree in my pocket, 
many hours of flying under my belt, and 
an interest in Science Fiction, it was 
■fore-told" that I would obtain the 
game for my new Computer. 

Probably due to my background, I was a 
little disappointed in the original 
game. It simply provided joystick 
control of the Lander to the landing 
site, a few "deadly" meteors that went 
straight across the Screen (If it 
moved. It was deadly), and the Lander 
ALWAYS started at the same location. 
Besides, what better way to learn the 
Color Computers' "on board" language 
than to see what could be done to 
make Lunar Lander more realistic and 
challenging. 

I added the Opening, more stars in the 
background, more meteors (some 
deadly, some miss you), angular motion 
tor the meteors, gravity and orbital 
forces, the retracting 'Antenna' and 
'Landing Legs', and a random starting 
location and velocity for the Lander 
which allows the Player to save the 
Lander IF he/she is quick enough. The 
"Gravity Force" is balarfced against 
the "Thrust Available" such that it 
takes almost FULL Thrust to set the 
Lander down safely (obviously, It you 
are coming down too fast, you are NOT 
going to get it stopped in time - 
i.e., you have to plan ahead; WATCH 
OUT FOR THAT METBORU; What's the fuel 
state? It wasn't like this In 
training.) . The next project was to 
add horizontal scrolling with several 
different landing sites, and a visual 
representation of the amount and 
direction of the thrust being used. 
How about a "real time" fuel gauge? 
Scoring depending on time, fuel used, 
etc.? It seemed that a Machine 
Language Routine would be needed to 
handle the horizontal scrolling, so it 
became necessary to look Into the 
Basic ROMs and the Instruction Set of 
the new CPU. One thing led to 
another, and I never got back to 
"SUPER Lunar Lander". 

As it now stands, it is an interesting 
and challenging game. No attempt has 
been made to stream-line the program 
to make use o£ the idiosyncrasies of 
BASIC in general, or the Color 
Computer BASIC specifically (that is 
left up to you) . It is simple and easy 
to follow. The instructions for 
playing the game begin at Statement 
No. 2000. 



The general sections of the Program 

are as follows: 

2 - 85 - the Opening 

90 - 270 = Logo and starting options 

288 - 350 = Initialization 

360 = Stars 

370 - 500 = Draw Mountains 

510 - 590 - "beep", draw Lander with 

or w/o Antenna or Legs 
600 - 716 - Meteors 
720 = calc. Horizontal Vel. 
730 -750 - chk fuel, do "free fall" 
7 56 - 790 = calc Vertical Vel, fuel 

used (depends on power applied) 
800 6 810 = if low fuel, "beep" 

warning 
840 & 850 - if "down", was it a "safe" 

landing <re. State. #1230) 
870 - 920 - chk if inside the galaxy 
925 ■ if below mountains, forget the 

meteors 
930 - 965 = 7? hit by a meteor 
970 - 1150 = ?? hit a mountain 
1160 - 1200 * "explosion" (size 

depends on how hard you hit) 
1210-1310 ■ "Mission Debriefing" 
2000 — > ■ Instructions and Starting 

Options 

Finally, to help in evaluating the 
Program, and as a GREAT aid in 
"customizing" it, I have also Included 
a Cross-Reference of "SUPER Lunar 
Lander". 

Robert L. Nay 



2 PMODE 4,1: PCLS: SCREEN 1,1 

4 S=0: Sl-0 

6 FOR B=l TO 50; X=RND(255): Y-R 

ND(191) 

8 PSET{X,Y,1): NEXT 

10 FOR S»l TO 21 

12 AS="S"+STR$ (S) 

14 BS=*BM"+STRS{127-4*S)+',"+STR 

$(93-2*S> 

16 CS= , BM"+STR$(l30-5*S)+","+STR 

$(97+2*S) 

18 DRAW "XA$;CljXB$,-NU4R4 BR2BU1 

NU3F1R2E1NU3BD1 BR2U4F4NU4 BR2E4 

F3NL6F1 BR2U4R3F1G1L1NF2L2" 

20 DRAW "XCS;D4R4 BR2E4F3NL6F1 B 

R2U4F4NU4 BR2U4R3F1D2G1L3 BR7NR4 

U2NR2U2R4 BD4BR2U4R3F1G1L1NF2L2" 

22 FOR T=l TO INT(2500/S) :NEXT 

24 IF Sl-22 THEN 70 

26 NEXT S 

28 FOR Sl=l TO 22 

30 IF Sl=22 THEN 18 

32 A$-"S"+STRS(S1) 

34 B$="BM"+STR$(l27-4*Sl)+","+ST 

R$(93-2*S1) 

36 C$="BM"+STR${130-5*Sl)+","+ST 

R$ (97+2*Sl) 

38 DRAW "XA$jC0,-XB$; NU4R4 BR2BU 

1NU3F1R2E1NU3BD1 BR2U4F4NU4 BR2E 

4F3NL6F1 BR2U4R3F1G1L1NF2L2" 

40 DRAW "XCS;C0;D4R4 BR2E4F3NL6F 

1BR2U4F4NU4 BR2U4R3F1D2G1L3 BR7N 

R4U2NR2U2R4 BD4BR2U4R3F1G1L1NF2L 

2" 

42 FOR T-l TO INT ( 2500/S ): NEXT 

60 NEXT SI 

70 GOSUB80 

75 GOTO90 






. I 



ft 



CP 



POOR MAN'S 
FLOPPY 

HIGH SPEED CASSETTE SYSTEM 

Now for the TRS-80 Color Computer 

The JPC PRODUCTS High Speed Cassette System, ; n operation 

for over 4 years, is now available for all versions of the Radio 

Snack« Color Computer, 

• TC-8C — Plugs directly into the expansion port of your 
TRS-80 Color Computer. It is fully compatible with all 
versions of the Color Computer from the standard 4K to 
the Extended 32K, 

• B^Si — Twice the speed of the Color Computer System, 

• RELIABLE — Less than one error in a million bits. 

• SUPPORTS TWO DRIVES— Software selectable. 

• ALL FILE TYPES — BASIC, machine language, data. 

• MOTOR CONTROL — Two on-board relays. 

• EPROM OPERATING SYSTEM 

• Sf*VRE EPROM SOCKET — 2716 or 2732 compatible. 

• OPTIONAL JBUG MONITOR — EPROM or Cassette 

• 6809 Assembler • Memory modify and list 

• 6809 Dis-assembler * Break point traps 

• ASSEMBLED and TESTED 

TC-8C SI 29.95 JBUG (EPROM) ... $34.95 



JBUG (Cassette) 

TERMS 

Cash. Master Ca«J or Visa 

Shipping & Handling S3 50(US) 

$5.50 (Canada} 51500 

f Foreign) TfechnicaJ 

Inquiries: Phone 

500 - 6X)0 PM MST 



$29.95 



•# 



CO 
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80 PLAY"L4;V31?T2;03?1;T6;6;1;6; 

T2;ll;T6jl0;6;l;O2;T2;A#;O3;T6,D 

#;02;A#j03,-D#;T2;G#;T6;G;F;D#;O3 

;T2;6* 

85 RETURN 

90 CLS 

91 PRINT#10, «*************- 

92 PRINT841, ** *" 
96 PRINT372, •* -SUPER-* 

100 PRINTS 104,** * 

* 

101 PRINT?136 r "* LUNAR LANDER * 

i 

102 print§168, "***************** 

■ 

103 PRINTS 202, "^PRlNTSai^"* - 

104 PRINT? 233,"*"; PRINTS 247," ** 

105 PRINT? 264*'* BY * 

■ 

110 PRINT* 295,"* ROBERT L NAY 

*■ 

115 PRINTS 326,"* 1981 

120 PRINT&419, "FOR INSTRUCTIONS 

PRESS "I" 

125 PRINT§449 f "ELSE PRESS RIGHT 

•FIRE' BUTTON* 

130 PRINT@490,"TO START GAME"; 

135 GOTO240 

210 GOTO220 

215 PRINT§448," TO START 

AGAIN" 
220 PRINT§416, ■ PRESS RIGHT ' 
FIRE' BUTTON" 
240 W=PEEK (65280) 
250 IFW-126THEN280 
260 IFW=254THEN280 
265 IF INKEY$="I"THEN2000 
270 GOTO240 
280 X=30+RND(185):Y-30+RND(50) 

290 B»RND(140):D-RND(140) jF^RNDf 
140):H=RND(140) 

291 B1=RNDU20):F1=RND(120) 

292 D1=RND(120):H1=RND(120) 

300 1»RND(10):J-RND(10):K=RND{10 
) :L=RND(10):S=4500 

301 IX=RND(12)JIY-RND(10)-4:JX=R 
ND(10):JY=RND(12)-5 

302 KX=RND(12):KY=RND(10)-4:LX=R 
ND(16) :LY»RND(14)-7 

310 N*0:V=0:A»0:O0:E=255:G=255: 
0-90 ;P-32: 0=0 

311 A1=0:E1=255:C1-0:G1=255 

312 AA=6: AM=6: LG-0 

314 C$="NH"+STR$ (AA) +"NU"+STR$ (A 

M)+"NE"+STR$(AA) 

316 D$«"NG"+STR$ (LG) : E$="NF*+ST 

R$(LG) 

320 T=RND(8)-4:U=RND(8)-4 

330 PM0DE4,1 

340 PCLS 

350 SCREENl f l 

360 FORM*lT025sPSET(RND{255),RND 

(140)):NEXTM 

370 LINE (0,191) -(45, 146), PSET 

380 LINE-(53,154),PSET 

390 LINE-(67,141),PSET 

400 LINE-(90,161),PSET 

410 LtNE-{105,146),PSET 

420 LINE- (165, 191 ),PSET 

430 LINE(200,191)-(240,161),PSET 

440 LINE-(255,141) r PSET 

450 DRAW"S4" 

460 DRAW"BM53,154;F5R5F14" 

470 DRAW"BM90,161;G30" 

460 DRAW"BM105,146;D4F20G10L3G10 

■ 

490 DRAW*BM67,141;D10F6" 

500 DR*WBM240,161;F10G10" 

510 X=0(+N:Y=Y+V 

515 SOUNDY,! 

520 IFX>255THENX=255 

530 IFX<0THENX=*0 

540 IFY>191THENY=191 

550 IFY<0THENY=0 

560 A$-"BM ,r +STRS{X)+","+STR$(Y) 

28 



570 DRAW"S2;C0;L7H5U2E5R5yXC$jR5 

F 5D2G 5L1 3D3R3 J XD$ ; Rl 5 ; XE$ j R3U 3L8 

■ 

572 IF Y>155 THEN RT-0 

574 IF Y<14fl THEN RT=6 

576 AMRTi AM=RT: LG^BS(RT-6) 

580 DRAW A$ 

583 CS="NH*+STR$ {AA) +"NU"+STR$ (A 

M)+"NE"+STR$(AA) 

586 D$="NG"+STRS{LG): E$-"NF"+ST 

R$(LG) 

590 DRAW"S2,*C1;L7H5U2E5R5;XC$;R5 

F 5D2G5L1 3D3R 3 ; XD$ ; Rl 5 ; XE$ ; R3U 3L8 

H 

600 PSET(A,B,0):A=A+I:IFA<255THE 

N620 

610 B=RND(140):I=RND(8):A-0 

620 PSET(A,B,1) 

622 PSET(A1,B1,0):A1=A1+IX:B1-B1 
4IY; IFA1->255THEN625 

623 IFBK0THEN625 

624 IFBK160THEN626 

625 B1-RND{140);IX-RND(12):IY=RN 
D(10)-4;A1=0 

626 PSET(A1 # B1,1) 

630 PSET(C,D,0):OC+JjIFC<255THE 

N650 

640 D=RND(140):J=»RND(8):C-0 

650 PSET(C,D,1) 

652 PSET(C1,D1,0) :Cl=Cl-hJX;Dl-Dl 
+JY: IFC1->255THEN655 

653 IF DK0THEN655 

654 IFDK160THEN656 

655 Dl=RND(140):JX=RND(12):JY-RN 
D{10)-4:C1«0 

656 PSET(C1,D1,1) 

660 PSET(E,F,0):E=E-K:IFE>0THEN6 

80 

670 F=RND(140):K*RND(8):E=255 

680 PSET(E,F,1) 

682 PSET(E1,F1,0):E1*E1-KX:F1=F1 
+KY:IFE1<0THEN685 

683 IFFKflTHENGaS 

684 IFFK160THEN686 

685 F1^RND(140):KX=RND(12):KY«RN 
D( 13) -5: £1-255 

686 PSET{El,Fl r l) 

690 PSET{G,H,0)sG^G-L:IFG>0THEN7 

10 

700 H=RND(140) JL=RND(8) :G-255 

710 PSET£G,H,1) 

712 PSET(G1,H1,0):G1=G1-LXjH1«H1 
+LY:IFGK0THEN715 

713 IFHK0THEN715 

714 IFHK160THEN716 

715 H1=RND(140):LX=RND(12):LY=RN 
D(12)-5:G1=255 

716 PSET(G1,H1,1) 

720 T=T+(JOYSTK(0)-P)/O:N=INT{T) 

730 IFS>0THEN756 

740 U-U+2:V=INT(U) 

750 GOTO840 

756 U=U+(Y-64)/512 

760 U=U+(J0YSTK(1)-P)/0:V=INT(U) 

770 S=S-ABS { ( JOYSTK ( 1 ) -64) /2) 

780 S-S^ABS (JOYSTK (0) -32) 

790 IFS<0THENS=0 

800 IFS>1000THEN840 

810 PLAY"V31;T255;L255;05?CB" 

840 IFY<186THEN870 

850 IFU>1.5THENQ=1:GOTO1160 

860 GOTO1200 

870 IFY>6THEN890 

880 Oj=3:GOTO1160 

890 IFX<249THEN910 

900 Q=3:GOTO1160 

910 IFX>8THEN925 

920 Q=3:GOTO1160 

925 IFY>140 THEN 970 

930 IFINT ( ABS (X^A)+ABS{Y-B))<8TH 

ENOj>2:GOTOll60 

940 IFINT ( ABS ( X-C) +ABS { Y-D) ) <8TH 

ENQj=2:GOTO1160 

9 50 IFINT (ABS ( X-E) +ABS (Y-F) ) <8TH 

ENG=2:GOTO1160 

960 IFINT(ABS(X-G)+ABS(Y-H))<8TH 



ENC-2;GOTO1160 

965 GOTO510 

970 IFX>45THEN990 

980 Y1«INT(181-(1*(X)+0]):GCTO11 

40 

990 IFX>53THEN1010 

1000 Yl=INT(l81-(-l*(X)+90)):GOT 

01140 

1010 IFX>67THEN1030 

1020 Yl=INT£181'(.93*(X)-12.214) 

) :GOTO1140 

1030 IFX>90THEN1050 

1040 Yl=INT(181-(-.87*(X)+108.3) 

) IGOTO1140 

1050 IFX>105THEN1070 

1060 Y1-INT(181-(1*(X)-60)):GOTO 

1140 

1070 IFX>165THEN1090 

1080 Yl=INT(181-(-,75*(X)+l23.75 

))jGOTO1140 

1090 IFX>200THEN1110 

1100 GOTO510 

1110 IFX>240THBN1130 

1120 Y1-INT(181-(.75*(X)-150)):G 

OTO1140 

1130 Yl=INT(181-(1.33*(X)-290)) 

1140 IFY>Y1 THEN Q-4:GOTO1160 

1150 GOTO510 

1160 F0RR=lTO4*(ABS(U)+6) 

1170 CIRCLE ( X,Y),R, 5 :NEXTR 

1180 F0RR«4*(ABS(U)+6)T01 STEP-1 

1190 CIRCLE(X,Y),R,0:NEXTR 

1194 F0RXX=1T02 

1195 PLAY"T255;L255;01CDEFGABAGF 
EDC j 02? CDEFGABAGFEDC; 03; CDEFGABA 
GFEDC; 04; CDEFGABAGFEDC; 05; CDEFGA 
BAGFEDC" 

1196 NEXTXX 

1200 FORM=1TO500.NEXTM 

1210 CLS:PCLS 

1220 IFQO0THEN1230 

1222 PRINT: PRINT" *C0NGRATULATI0 

nr, # YC3U MADE IT* " 

1224 GOSUB80 

1226 GGTO1270 

1230 IFQ-1THENPRINT"Y0U CRASHED, 

TOUCHDCWN TOO HARD" :G0T01 270 
1240 IFQ=*2THENPRINT"Y0U WERE HIT 

BY A METEOR" :G0T01 270 
1250 IFQ=3THENPRINT"Y0U HIT THE 
EDGE OF THE GALAXY" :GOTO1270 
1260 PRINT" YOU CRASHED ON THE MO 
UNTA1NS" 

1270 PRINT: PRINT tPRIN^* FLIGHT ST 
ATISTICS:' 

1280 PRINT" FUEL REMAINING ;";S 
1290 PRINT" VERT* VELOCITY :";- 
U 

1300 PRINT* HOR. VELOCITY :"jT 
1310 GOT0215 
2000 CLS 

2010 PRINT"YOU ARE THE PILOT OF 
THE LUNAR" 

2020 PRINT" LANDER.": PRINT 
2030 PRINT"Y0U CONTROL THE CRAFT 

BY USING" 
2040 PRINT" THE RIGHT JOYSTICK." 
: PRINT 

2050 PRINT"THE OBJECT OF THE GAM 
E IS TO" 

2060 PRINT" LAND THE CRAFT ON LE 
VEL GROUND" 

2070 PRINT* AT A VERTICAL SPEED 
OF LESS" 

2080 PRINT" THAN -1,5 FEET PER S 
ECOND.": PRINT 

2090 PRINT" (ANY KEY TO CONTINUE) 
N 

2100 IF INKEY$=""THEN2100 
2110 CLS 

2120 PRINT"HCWEVER, IT IS NOT VE 
RY EASY.": PRINT 

2130 PRINT"IN OUTER SPACE, THERE 
ARE" 
2140 PRINT" RANDOM METEORS THAT 
WILL" 
2145 PRINT" EXPLODE YOUR CRAFT I 
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CoCo HEADQUARTERS 



Looking to unlock the capacity of your Color Computer? 

Search no more — 



TOLL FREE 
1-800-251-5008 




SPECIALS 



DEIKER 



imam 




Extended Basic $ 69.00 
32/64k Upgrade $ 69.00 

16k Upgrade $ 25.00 

R/S Disk Controller $189.00 
1.1 Basic ROM $ 27.00 
Amdek Disk Drives $ Call! 



Super Pro Keyboard Kit 
26-3004 Color Computer 16k 
26-3002 Extended L6k CoCo 
26-3003 32k Extended CoCo 
26-3003(d> 32/64k Ext. CoCo 
26-1192 CGP-115 Printer 
ACCESSORIES 



Hayes SM1200 Modem $ 

USE AL212 (300/1200) $ 

Hayes SM 300 Modem $ 

R/S D.C. Modem 2 $ 

USR AL300 $ 

R/S D.C. Modem 1 $ 

Hayes/USR Cable $ 

26-3020 Cable $ 



599.00 

495.00 

239.00 

215.00 
199.00 

129. 00 

19.00 

5.25 



26-1208 CCR-S1 

26-3008 Joysticks 

Kraft Joystick 

Wico Track Ball 
Wico Joys tick 

Wico Adapter 

Verbatim Disks 

Elephant Disks 



$ 


69.95 


$ 


179.00 


$ 


269.00 


$ 


379.00 


$ 


349.00 


$ 


1 7 9.00 


$ 


52 .00 


s 


22 .00 


$ 


49. 95 


$ 


59.95 


$ 


29.00 


$ 


19.95 


$ 


27.95 


$ 


25.00 



SOFTWARE 



Telewriter 64 
Telewr iter 64 
Zaxxon by Sega 
The King by Tom 

The Frog by Tom 

Trapfall by Tom Mix S 27.95(Cass) 

The Bar Zapper $ 15.95(Cass) 



$ 59.95(Disk) Space Shuttle $28.95 (Cass) 

S 49.95(Cass) Colorpede $ 29.95 (Cass) 

$ 34.95CC or D) Nark Data Ad vent urea $ 2 4 . 95 (Cass) 

Mix $ 26.95(Cass) Ghost Gobbler $19.95 (Cass) 

Mix $ 27.95 (Cass) MSI DATABASE $39.95 (Disk) 

MSI Color Finance $59.95 (Disk) 

The Graph Zapper $15.95 (Cass) 



**** All TRS-80 Software 132 off list ***** 

Others Include - Spectral Associates, Anteco, Prickly Pear, 
Mark Data, Tom Mix, Botek Instruments* Intracolor Communications 

Sugar Software, Cognitec, 
and many more? 



TOLL FREE 
TENNESSEE 

1-800-545-2502 

All of the above units covered by our 120 
day carry in warranty, (d) denotes "Delker" 
(200ns) memory guaranteed for 1 year 
TRS-80 Trademark Tandy Corporation. 
Prices subject to change without notice. 

Write for our FREE newsletter! 




TOLL FREE 
1-800-251-5008 

{DEALER INQUIRIES WELCOME) 

DELKER ELECTRONICS, INC. 

P.O. BOX 897 

DEPT D 

SMYRNA, TN 37167 

800-251-5008 

615-459-2636 (TENNESSEE) 
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p you" 

2147 PRINT* GET TOO CLOSE. ":PRIN 

T 

2160 PRINT"THE METEORS ARE THE M 

OVIMG" 

2170 PRINT" POINTS OF LIGHT. THE 

STARS" 
2180 PRINT" ARE THE STATIONARY P 
OINTS OF" 

2190 PRINT* OF LIGHT AND ARE HAR 
MLESS.": PRINT 
2200 PRINT" (ANY KEY TO CONTINUE) 

2210 IF INKEY$=*"THEN2210 

2220 CLS 

2230 PRINT" AND TO MAKE THINGS WO 

RSE " 

2240 PRINT YOU HAVE A LIMITED A 

MOUNT" 

2250 PRINT" OF FUEL TO LAND WITH 

•"sPRINT 

2260 PRINT"WHEN YOUR FUEL GETS L 

OW A" 

2270 PRINT 'LOW FUEL' ALARM WIL 

L SOUND" 

2280 PRINT TO INFORM YOU OF THE 

IMPENDING" 
2290 PRINT" DANGER.": PRINT 
2300 PRINTWHEN THE ALARM STOPS r 

YOU ARE" 
2310 PRINT OUT OF FUEL, AND THE 

REST WILL" 
2320 PRINT BE HISTORY.": PRINT 

2330 PRINT (ANY KEY TO CONTINUE) 

• 

2340 IF INKEYS=""THEN2340 
2350 CLS 

2360 PRIMTFINALLY, DO NOT ATTEM 
P TO LAND" 

2370 PRINT" ON THE MOUNTAINS. "sP 
RINT 

2380 PRINT" YOUR ENGINES ARE NOT 
'TIP' " 

2390 PRINT" PROOF SO ANY ATTEMP 
TO DO* 

2400 PRINT SO WILL RESULT IN AN 
EXPLOSION »": PRINT 
2410 PRINTPRESS ANY KEY TO STAR 
T THE" 
2420 PRINT GAME, AND GOOD LUCK. 

* 

2430 IF INKEY$»"*THEN2430 
2440 GGTO280 



"SUPER Lunar Lander* Cross-Fteterence 



A 


310 600 610 620 


930 


A$ 


12 32 560 580 




Al 


311 622 625 626 




AA 


312 314 576 583 




AM 


312 314 576 583 




B 


6 290 600 610 620 930 


B$ 


14 34 


• 


Bl 


291 622 623 624 625 626 


C 


310 630 640 650 


940 


C$ 


16 36 314 583 




CI 


311 652 655 656 




D' 


290 630 640 650 


940 


D$ 


316 586 




Dl 


292 652 653 654 655 656 


E 


310 660 670 680 


950 


ES 


316 586 




El 


311 682 685 686 




F 


290 660 670 680 


950 


Fl 


291 682 683 684 


685 686 


G 


310 690 700 710 


960 


Gl 


311 712 715 716 




H 


290 690 700 710 


960 


HI 


292 712 713 714 


715 716 


I 


300 600 610 




IX 


301 622 625 




IY 


301 622 625 




J 


300 630 640 




JX 


301 652 655 





JY 301 652 655 

K 300 660 670 

KX 302 682 685 

KY 302 682 685 

L 300 690 700 

LG 312 316 576 586 

LX 302 712 715 

LY 302 712 715 

M 360 1200 

N 310 510 720 

O 310 720 760 

P 310 720 760 

Q 310 850 880 900 920 930 940 950 

960 1140 1220 1230 1240 1250 
R 1160 1170 1180 1190 
RT 572 574 576 
S 4 10 12 14 16 22 26 42 90 300 730 

770 780 790 800 1210 1280 2000 

2110 2220 2350 
SI 4 24 28 30 32 34 36 60 
T 22 42 320 720 1300 
U 320 740 756 760 850 1160 1180 

1290 

V 310 510 740 760 
W 240 250 260 

X 6 8 280 510 520 530 560 890 910 
930 940 950 960 970 980 990 1000 
1010 1020 1030 1040 1050 1060 
1070 1080 1090 1110 H20 1130 
1170 1190 

XX 1194 1196 

Y 6 8 280 510 540 550 560 572 574 
756 840 870 925 930 940 950 960 
1140 1170 1190 

Y$ 265 2100 2210 2340 2430 
Yl 980 1000 1020 1040 1060 1080 1120 
1130 1140 



The Clear Winner 




The Original FLEX from Data-Comp 



18 CALLED BY 


30 


70 CALLED BY 


24 


80 CALLED BY 


70 1224 


90 CALLED BY 


75 



215 CALLED BY 1310 

220 CALLED BY 210 

240 CALLED BY 135 770 

280 CALLED BY 250 260 2440 

510 CALLED BY 965 1100 1150 

620 CALLED BY 600 

625 CALLED BY 622 623 

626 CALLED BY 624 
650 CALLED BY 630 

655 CALLED BY 652 653 

656 CALLED BY 654 
680 CALLED BY 660 

685 CALLED BY 682 683 

686 CALLED BY 684 
710 CALLED BY 690 

715 CALLED BY 712 713 

716 CALLED BY 714 
756 CALLED BY 730 
840 CALLED BY 750 800 
870 CALLED BY 840 
890 CALLED BY 870 
910 CALLED BY 890 
925 CALLED BY 910 
970 CALLED BY 925 
990 CALLED BY 970 
1010 CALLED BY 990 
1030 CALLED BY 1010 
1050 CALLED BY 1030 
1070 CALLED BY 1050 
1090 CALLED BY 1070 
1110 CALLED BY 1090 
1130 CALLED BY 1110 

1140 CALLED BY 980 1000 1020 1040 
1060 1080 1120 

1160 CALLED BY 850 880 900 920 930 
940 950 960 1140 

1200 CALLED BY 860 

1230 CALLED BY 1220 

1270 CALLED BY 1226 1230 1240 1250 

2000 CALLED BY 265 

2100 CALLED BY 2100 

2210 CALLED BY 2210 

2340 CALLED BY 2340 

2430 CALLED BY 2430 
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Submitted for Publication 



COLOR MICRO JOURNAL I* actively soliciting 
contributions for publication* Me are looking 
for ANY type of material that will be useful to a 
Color Computer Owner; from hints to full Programs 
and Construction Articles. Me will pay for 
submissions based on a number of criteria, ff 
you -Ish payment for a contribution, be sure to 
state these requirements with your submission. 
ALL submissions must contain a statement that 
the material Is not currently under 
consideration by another publication, ^or more 
detailed Information, send a SASE to the Editor, 
COLOR MICRO JOURNAL, P.O. Box 344, Mason, TM 
37343. 

Articles submitted for publication should be 
accompanied by the authors Foil Name, Address, 
Gate* and Telephone Number. It Is preferred 
that articles be submitted as a .TXT File on a 
FLEX Formatted 5 or 8 Inch Disk, or as an ASCII 
File on a Radio Shock Disk or Tape (o /OAT Filet* 
BASIC Programs should be submitted on Disk or 
Tape tn the normal Binary Format. 

If articles are submitted on paper, they should 
be either Typed or Printed SIngte Spaced with a 
MAXIMUM Line Length of ** on normal B 1/2" x 11" 
bond or better paper. A good BLACK Ribbon must 
ba used because all paper submitted articles, -III 
be photo reproduced. NO hand written articles 
w 1 1| be accepted Cexcept required art work which 
,oes with an article). Again, PLEASE use a DARK 
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All letters to the editor should eiso comply with 
the above and MUST bear a signature. Letters of 
'gripes' as well as 'praise 1 arm solicited. we 
attempt to publish ail letters to the editor 
verbatim; however, we reserve the right to 
reject any submission for lack of «gcod taste'. 
Me also reserve the right to define what 
constitutes «good taste*. 

Advertising: Commercial advertisers please 
contact the COLOR MICRO JOURNAL advertising 
department for current Rate Sheet and 
Requirements. 

TRS-80C, Color Basic, Extended Color Basic, and 
Disk Color Basic are trademarks of the Tandy 
Corp. FLEX and UnlFLEX are trademarks of 
Technical Systems Consultants, Inc* OS-9 and 
BA5IC09 ere trademarks of MIcroware Systems 
Corp. UNIX Is a trademark of Bell Laboratories. 
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You have HEARD about FLEX(tm); now LEARN about FLEX, 
Subscribe to the 9 6B 9 Micro Journal! 

You have HEARD about the power of the 6809 Computer Chip 

in your Color Computer; now LEARN how to use this power. 

Subscribe to the , 68" Micro Journal! 

You have HEARD about the "Multi-User, Multi-Tasking" UNIX(tm) style 
Operating Systems (such as 0S-9(tm) and UfiiFLEX(tm)); now LEARN about them. 

Subscribe to the M €8' Micro Journal! 

Your have HEARD about all the Software available for the 68xx Series Based 
Computer Systems; now LEARN about this Software AND the Computer Systems. 

Subscribe to the *€8' Micro Journal! 



■68 f Micro Journal provides INFORMATION thru: 
Regular MONTHLY Columns like "FLEX Users Notes" by Ron Anderson, "OS-9 Users 
Notes" by Peter Dibble, "C Users Notes" by Norm Commo, "Color Users Notes" 
by Bob Nay, etc. 
Regular MONTHLY Features like the "Bit Bucket", Reviews, Articles, Programs, 
etc, covering Software Development, Business Use, Operating System 
operation, hints, etc. 

• 
DON'T MISS A SINGLE ISSUE; SUBSCRIBE MOW! 
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SUBSCRIPTION RATES 

USA 
1 Year $24.50, 2 Year $42.50, 5 Year $64.50 

"FOREIGN SURFACE Add $12.00 per Year to USA Price 

•FOREIGN AIRMAIL Add $36.00 per Year to USA Price 

••CANADA & MEXICO Add $5,50 per Year to USA Price 
Cash (USA) or drawn on a USA Bank!!! 
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OK, PLEASE ENTER MY SUBSCRIPTION 
Bill My: Master Charge ZJ — VISA Q 

Card#____ _ Exp. Date 

For □ 1-Year □ 2 Years Q 3 Years 



Enclosed: $. 



Name 



Street 



City. 



State 



-Zip. 



My Computer ls:_ 



68 Micro Journal 

5000 CMMndri SfiUlh Rd 

HI**on, TN 37343 
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GIMIX 2MHZ 6809 SYSTEMS CAN BE CONFIGURED TO RUN: 
FLEX • OS-9 LEVEL ONE • UNIFLEX • OS-9 LEVEL TWO 

SINGLE USER SYSTEMS with 56KB of static RAM 

MULTI USER SYSTEMS with 128-512KB of static RAM and up 

YOUR GIMIX SYSTEM CAN GROW WITH YOUR NEEDS 



CHOOSE FROM GIMIX SVa" OR 8" FLOPPY DISK DRIVE 
SYSTEMS AND WINCHESTER DRIVE SYSTEMS 



1337 WEST 37th PLACE 
!ZVjnE.T.i£ 1 ™*™ b „ c,m,x ,. c . CH,CA £0; ^UNOIS 606O9 

FLEX Md UnifLEX we trademarks of Technical SjTleolJ Consultants Inc. (312) 927-5510 
OS-9 tt a trademark of Microware Sptems Cap. TWX 910-221-4055 



Eimix 



inc. 



(&\%2 GIMIX Inc. 
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